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I 000000 .REPT 

2 

3 

4 IDENTIFICATION 

S 
6 

7 PRODUCT CODEI MAlNDEC*"il»DFKAB»C-»D 

8 

9 

PRODUCT NAME! 11/34 TRAP TEST 

1 
2 

3 DATE t MAY 1977 

4 
S 

6 MAINTAINEP i DIAGNOSTIC GROUP 

7 
3 

9 AUTHORl GLENN JOHNSON 

20 
1 

.2 

23 COPYRIGHT (C) 1975,1977 DIGITAL EQUIPMENT CORP., MAYNAPD, MASS • 

24 
23 

26 THIS SOFTWARE IS FURNISHED TO PURCHASER UNDER A LICENSE FOR USE 

27 ON A SINGLE COMPUTER SYSTEM AND CAN BE COPIED ( WITH INCLUSION 

28 OF DEC'S COPYRIGHT NOTICE) ONLY FOR USE IN SUCH SYSTEM, EXCEPT 

29 AS MAY OTHERWISE BE PROVIDED IN WRITING BY DEC, 

30 

31 THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT 

32 NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL 

33 EQUIPMENT CORPORATION, 

34 

35 DEC ASSUMES NO RESPONSIBILITY FOR THE USE OP RELIABILITY OF 

36 ITS SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DEC, 
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37 

38 Is ABSTRACT 

39 

40 THIS IS A TEST OF ALL OPERATIONS AND INSTRUCTIONS THAT CAUSE 

41 TRAPS. ALSO TESTED ARE TRAP OVERFLOW CONDITIONS, 

42 ODDITIES OF REGISTER 6, INTERRUPTS , THE RESET AND WAIT INSTRUCTIONS , 

43 

44 2. REQUIREMENTS 

43 

46 2,1 EQUIPMENT 

47 

48 11/04 STANDARD COMPUTER 

49 

50 2.2 STORAGE 

51 

52 2,2,1 PROGRAM STORAGE - THE ROUTINE USES MEMORY 

53 FROM 0000 TO 17500, 

S4 

55 3. LOADING PROCEDURE 

56 

57 3,1 METHOD 

33 

59 PROCEDURE FOR NORMAL ABSOLUTE TAPES SHOULD BE FOLLOWED, 

60 

61 4 8 STARTING PROCEDURE 

62 

63 

64 THE PROGRAM STARTS AT 200, 

65 

66 IF IT IS DESIRED TO RESET THE PASS COUNT BACK TO 

67 ZERO % THEN START THIS PPOGRAM AT LOCATION 210 

69 4.2 PROGRAM AND/OP OPERATOR ACTION 

70 

71 LOAD PROGRAM INTO MEMORY. (BOTTOM 4K) 

72 LOAD ADDRESS, 

73 START, 

74 THE PROGPAM WILL LOOP, 

75 IT WILL PRINT "END OF DFKAB" AFTER THE FIRST ITERATION 

76 AND THEN PRINTS IT EVERY 15 TIMESC A PROXIMATELY A MINUTE) 
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77 
78 

79 5. OPERATION 

80 

81 

82 

83 5,2 SUBROUTINE ABSTRACTS 

84 

85 5.2.1 BEGIN AT 200 

83 

§7 S 6 2„2 SCOPE 

18 

89 IF A SCOPE LOOP IS NEEDED INSERT A BRANCH AS THE 

§0 COMMENT TO THE HALT EXPLAINS. 

91 

92 

93 5.2.3 TRAPCATCHER 

94 — 
9S 

96 THIS IS A SERIES OF INSTRUCTIONS DESIGNED TO DETECT AND 

97 ISOLATE UNEXPECTED TRAPS AND INTERRUPTS, THAT OCCUR IN THE 

98 TRAP AND INTERRUPT VECTOR AREA OF MEMORY. 
99 

100 THE PRINCIPLE OF THIS ROUTINE ISj THE VECTOR ENTRANCE 

|0t ADDRESS POINTS TO THE NEXT SEQUENTIAL WORD WHICH WILL CON- 

102 TAIN A HALT (000000) (THIS LOCATION IS ALSO THE STATUS 

103 WORD FOR THAT VECTOR ENTRANCE. BUT THIS WILL HAVE NO EFFECT 

104 ON IT ALSO BEING THE NEXT INSTRUCTION). 
105 

106 IF A HALT OCCURS IN THE TRAP OR INTERRUPT VECTOR AREA, 

107 REGISTER SIX SHOULD BE EXAMINED TO DETERMINE ITS CONTENTS, 

108 THEN USE REGISTER SIX CONTENTS AS An ADDRESS TO DETERMINE 

109 WHERE THE PROGRAM WAS , WHEN THE INTERRUPT OR 

HO TRAP OCCURRED! MEMORY AS SPECIFIED «Y R6 CONTAINS THE 

HI PC OF THE INSTRUCTION FOLLOWING THE INSTRUCTION WHEUE THE 

112 TRAP OCCURRED „ 

H3 THE CONTENTS OF LOCATION ' $ TESTN ' ( 304 ) CONTAINS 

114 THE TEST NUMBER THAT IT WAS DOING BEFORE IT 

US TRAPPED, 

116 

117 5.3 PROGRAM AND/OR OPERATOR ACTION 

118 

119 5.3.1 LOADING AND STARTING AT 200 STARTS THE TEST. IF 

120 AN ERROR IS DETECTED, THERE WILL BE A HALT. 

121 NOTE! IF A SCOPE LOOP IS NEEDED 

122 THE COMMENT SECTION OF THE HALT EXPLAINS 

123 HOW TO UTILIZE THIS LOOP. 
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124 

125 6 S ERRORS 

126 

127 6.1 ALL ERRORS WILL CAUSE A HALT, 

128 

129 6.1,1 THE PROGRAM CHECKS TO SEE THAT THE P.C. DOESN'T JUMP 

130 WITHIN THE TESTS, BY A SEQUENCE COUNT CALLED ' $ TSTN ' 

131 THIS TEST IS A 5EQUENCIAL INCREMENT AND COMPARE COUNT, 
132 

133 EXAMPLE 
134 

135 TSTAl INC 9«$TSTNM f INCREMENT THE TEST NUMBER 

136 CMP *A,0#STSTNM 'COMPARE FOP THE RIGHT TEST 

137 BNE TSTA+1-12 »IF NOT CORRECT BPACNH TO A HALT 

13 8 ...» 

139 CODE 
140 

141 
142 

143 IMPORTANT 

144 

145 

146 IF AN ERROR IS DETECTED J IT COULD BE BECAUSE OF TWO REASONS, 

147 A) WRONG TEST NUMBER 

148 B) ERROR IN THE PRESENT TEST, 
149 

150 //////////////////////////////////////////////////////// 

151 THE TEST SEQUENCE LOCATION "TESTN" SHOULD BE CHECKED FIRST 

152 TO SEE IF IT MATCHES THE PRESENT TEST, 

153 IF IT DOESN'T MATCH j THEN THE CONTENTS OF THIS LOCATION 

154 TELL YOU WHICH TEST IT WAS DOING BEFORE IT HALTED, 

155 //////////////////////////////////////////////////////// 

156 

157 6,2 ERROR RECOVERY 

139 

159 ON TRAP ERRORS » RESTART AT STARTING ADDRESS 

160 

161 7. RESTRICTIONS 

162 7,1 STARTING RESTRICTION 

163 

184 NONE 
165 

166 7,2 OPERATIONAL RESTRICTION 

167 

169 NONE 

1S9 
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170 

171 8, MISCELLANEOUS 

1?3 8,1 EXECUTION TIME 

17* 

175 FOB ONE ITERATION ABOUT S SECONDS, 

176 IT TYPES "END OF DFKAB" ^PROXIMATELY EVERY MINUTE. 
177 

178 9, PROGRAM DESCRIPTION 

179 

180 THIS PROGRAM CHECKS THAT ON ALL TRAP OPERATIONS REGISTER 

181 6 IS DECREMENTED THE CORRECT AMOUNT, THAT THE CORRECT 

182 PC IS SAVED ON THE STACK, THAT THE OLD CONDITION CODES AND 

183 PRIORITY ARE PLACED ON THE STACK AND THAT THE NEW STATUS AND 

184 CONDITION CODES ARE CORRECT, BOTH THE "TRAP" AND "EMT" 

185 TRAP INSTRUCTIONS ARE TESTED TO SEE THAT ALL COMBINATIONS WILL 

186 TRAP, CHECKED ALSO IS THAT ALL RESERVED INSTRUCTIONS 

187 WILL TRAP, VERIFICATION OF THE "TPT" INSTRUCTION (00003) 

188 WHICH IS USED FOR SOFTWARE DEBUG ROUTINES! ODT, DDT, IS DONE, 

189 ALSO, THE TRACE BIT IS CHECKED TO SEE IF IT CAUSES A TRAP, 

190 THE RTI AND RTT INSTRUCTIONS ARE CHECKED, STACK OVERFLOW IS 

191 ALSO CHECKED FOR ALL THE TRAP INSTRUCTIONS, 

192 SPECIAL CHECKS ARE MADE TO SEE IF BUS 

193 ERROR TRAPS OCCUR ON NON-EXISTENT MEMORY, 
194 

lf§ 8 ENDR 



a Mhin a MACYll 27(1006) 04«MAY*»77 0§li3 PAGE 6 



DrKABC.PH 03-MAY-77 00142 SEO 0006 

196 } ALL INSTRUCTIONS THAT ARE RESERVED 

197 | SHOULD TRAP TO LOCATION 10, AND THE 

198 |PC THAT POINTS TO THE TRAPPING INSTRUCTION 

199 j SHOULD BE PLACED ON THE STACK 
200 

201 

202 fLISTlNG 

203 

204 

205 

206 S LI8T ME 

207 .NLIST MC,MD,CND 
308 ,ABS 

209 000006 SP»%6 

210 000006 R6a%6 

211 000003 TABa%3 

212 000001 LAST»%1 

213 000003 FIRSTb%5 

214 000002 R2»%2 

215 000000 HLTaHALT 

216 000003 TRT»3 

217 000004 ITRAP5«4 

218 000004 RTRAP5«4 1 RESERVED INST AND ILLEGAL ADDRESSES 

219 000014 RTRAP4»14 >FOR TRACE TRAP 

220 000030 RTRAP3«30 jFOR EMULATOR TRAP 

221 000020 RTRAP2»20 ;FOR IOT TRAP 

222 000034 RTRAPi«34 I FOR TRAP INST 

223 177564 TTCSR-177564 

224 177560 TPCSR«177560 

225 177564 TPS«177564 

226 177S66 TPBsl773S6 

227 000240 BELL*240 

228 000240 NOP«240 

229 177776 STATUS«177776 

230 000007 TRAPA-7 

231 000010 RTRAPbIO 

232 004700 ILLAb004700 

233 000100 ILLBalOO 

234 177776 CC-177776 
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233 
236 
237 
238 
239 
240 
241 
242 
243 
244 
24S 
246 
247 
248 
249 
230 
251 
252 
253 
254 
255 
256 
257 
258 
259 
260 
261 
262 
263 
264 
265 
266 
267 
268 
269 
270 
271 
272 
273 
274 
27 S 
276 
277 
278 
279 
280 
281 
282 
283 
284 
285 
286 
287 
288 
289 
290 



000200 
000200 000167 000414 

000210 
000210 005037 000306 
000214 000167 000400 

000300 



000300 

000046 
000046 015302 

000052 
000032 000000 

000300 



000300 
900300 
000}02 
000304 
000306 
000310 
900312 
000314 
000316 
000320 
000320 
000321 
000322 
000324 
000326 



000330 



000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 

000 
000 
000000 
000000 
000000 



000330 
000024 

000024 000200 
000044 

000044 000330 
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8 »200 

JMP BEGIN 

8 «210 

CLR itgPASS 
JMP BEGIN 
.8300 

.SBTTL ACT11 HOOKS 



f HOOKS REQUIRED BY ACT11 

f SAVE PC 



$SVPC8„ 
„8>46 
gENDAD 
a a52 

.WORD 
.■ISVPC 

.SBTTL APT MAILBOX»ETABLE 



I ? 1 )SET L0C.46 TO ADDRESS Of $ENDAD IN .$EOP 



!|2)SET LOC.52 TO ZERO 
1 1 RESTORE PC 



,EVEN 

fMAILl ffAPT MAILBOX 

fMSGTY; .WORD AMSGTY j j MESSAGE TYPE CODE 

IFATALI .WORD AFATAL | (FATAL ERROR NUMBER 

iTESTNl .WORD ATESTN f | TEST NUMBER 

fPASSl .WORD APA88 ffPASS COUNT 

IDEVCTI .WORD ADEVCT | |DEVICE COUNT 

fUNITt .WORD AUNIT f fZ/O UNIT NUMBER 

fMsGADl .WORD AMgGAD | f MESSAGE ADDRESS 

fMSGLGl .WORD AMfiGLG | f MESSAGE LENGTH 

$ STABLE i | | APT ENVIRONMENT TABLE 

lENVl .BYTE AENV f | ENVIRONMENT BYTE 

«ENVM| .BYTE AENVM j | ENVIRONMENT MODE BITS 

SSWREGg .WORD ASWREG % f APT SWITCH REGISTER 

fUSWRf .WORD AUSWR f |U5ER SWITCHES 

iCPUOPt .WORD ACPUOP ffCPU TYPE, OPTIONS 

I* BITS 15«11»CPU TYPE 

|» ll/04«01,ll/05«02,ll/20«03, 11/40-04, 11/45*05 

g* 11/70»06,PDQ807,0b10 

l« BIT IObREAL TIME CLOCK 

BIT 9«FL0ATING POINT PROCESSOR 
BIT 8-MEMORY MANAGEMENT 



i* 

tETENDi 

.MEXIT 
.SBTTL 



APT PARAMETER BLOCK 



I SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT 

.tXa. | f SAVE CURRENT LOCATION 

.•24 |f SET POWER FAIL TO POINT TO START OF PROGRAM 

200 f» FOR APT START UP 

.■44 | | POINT TO APT INDIRECT ADDRESS PNTR. 

tAPTHDR $ t POINT TO APT HEADER BLOCK 

a a,$X } f RESET LOCATION COUNTER 

I SETUP APT PARAMETER BLOCK AS DEFINED IN THE APT-PDPii DIAGNOSTIC 



.MAIN. 


MACYil 


27(1006) 


DFKABC 


Pll 03»MAY«®?7 


291 






292 






293 


000330 




294 


000330 


000000 


295 


000332 


000300 


296 


000334 


000002 


297 


000336 


000002 


298 


000340 


000000 


299 


000342 


000014 


300 




000304 


301 




000302 


302 






303 




000500 


304 


000300 


000000 


305 


000302 


177572 


306 


000504 


177573 


307 


000506 


177574 


308 


000510 


177576 


309 


000512 


000230 


310 


000314 


000252 


311 


00051S 




312 


00051S 


177600 


313 


000320 


177602 


314 


000522 


177604 


313 


000524 


177606 


316 


000526 


177610 


317 


000330 


177612 


318 


000532 


177614 


319 


000534 


177616 


320 






331 


00053S 


177640 


323 


000340 


177642 


323 


000542 


177644 


324 


000544 


177646 


325 


000346 


177630 


326 


000530 


177652 


327 


000552 


177654 


328 


000554 


177656 


329 






330 


000556 


172300 


331 


000560 


172302 


332 


000562 


172304 


333 


000564 


172306 


334 


000566 


172310 


335 


000570 


172312 


336 


000572 


172314 


337 


000574 


172316 


338 






339 


000576 


172340 


340 


000600 


172342 


341 


000602 


172344 


342 


000604 


172346 


343 


000606 


172350 


344 


000610 


172352 


345 


000612 


172354 


346 


000614 


172356 



08113 PAGE 8 

APT PARAMETER BLOCK 



I INTERFACE SPEC a 



lAPTHDl 

fHIBTSp 
|MBADRg 
|TSTM| 
SPASTM j 
lUNITMl 

iTSTNMa 
gERRORa 



BUFFi 

SROI 

SROHl 

SR11 

SR2i 

KTVEC I 

KTSTAt 

ADRTABl 

UPDROi 

UPDRlt 

UPDR2I 

UPDR3I 

UPDR4I 

UPDR5 J 

UPDR6t 

UPDR7 I 

UPAROi 
UPARll 
UPAP2g 
UPARSt 
UPAR4I 
UPARSt 
UPAR6I 
UPAR7 t 
t 

KPDROI 
KPDR1 I 

KPDR2I 
KPDR3I 
KPDR41 
KPDRSl 
KPDR6 I 
KPDR7 I 
I 

kparoi 

KPARll 

KPAR2I 
KPAR3I 
KPAR4I 
KPARSi 
KPAR6 ! 
KPAR7 l 



,WORD 
.WORD 
,WORD 
.WORD 
.WORD 
.WORD 
ITESTN 
g FATAL 

8 b300 


177572 
177573 
177574 

177376 
230 
252 

177600 
177602 
177604 

177606 
177610 
177612 
177614 
177616 

177640 
177642 
177644 
177646 

177650 
177652 
177654 

177636 

172300 
172302 
172304 
172306 
172310 
172312 
172314 
172316 

172340 
172342 
172344 
172346 
172350 
172352 
172354 
172356 





IMAIL 

2 
2 




1 1 TWO HIGH BITS OF 18 BIT MAILBOX ADDR, 
M ADDRESS OF APT MAILBOX (BITS 0-15) 
I 1 RUN TIM OF LONGEST TEST 

I 1 RUN TIME IN SECS, OF 1ST PASS ON 1 UNIT (QUICK VERIFY) 

I 1 ADDITIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT 



IETEND«|MAIL/2 m LENGTH MAILBOX-ETABLE( WORDS) 



*USER PAGE DESCRIPTOR REGISTERS 



I USER PAGE ADDRESS REGISTERS 



} KERNEL PAGE DESCRIPTOR REGISTERS 



j KERNEL PAGE ADDRESS REGISTERS 
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SEQ 0009 



347 
348 
349 
350 



000616 000614 



.MAIN. 


MACYl 1 


27(1006) 


Q4»MA^ 


DFKABC ,P1 1 03»MAY»77 


08142 


351 








352 


000620 


012737 


177777 


353 


000626 


005067 


177446 


354 


000632 


012767 


015706 


355 


000640 


012767 


000340 


356 


000646 


005067 


177432 


357 


000652 


005067 


177424 


358 


000656 


012702 


000300 


359 








360 








361 




000000 




362 








363 


000662 


000167 


000024 


364 


000666 


000000 




365 


000670 


oooooo 




366 


000672 


oooooo 




367 


000674 


oooooo 




368 


000676 


oooooo 




369 


000700 


oooooo 




370 


000702 


052525 




371 


000704 


052400 




372 


000706 


OOOOOO 




373 


000710 


OOOOOO 




374 








375 








376 








377 


000712 


005237 


000304 


378 


000716 


022737 


000001 


379 


000724 


001137 




380 


000726 


005006 




381 


000730 


112667 


177044 


382 


000734 


020627 


000002 


383 


000740 


001405 




384 


000742 


012737 


000001 


385 


000750 


005212 




386 


000752 


OOOOOO 




387 








388 








389 








390 


000754 


012706 


001000 


391 


000760 


114627 


oooooo 


392 


000764 


020627 


000776 


393 


000770 


001405 




394 


000772 


012737 


000002 


395 


001000 


005212 




396 


001002 


OOOOOO 




397 








398 








399 








400 


001004 


005006 




401 


001006 


112626 




402 


001010 


020627 


000004 


403 


001014 


001405 




404 


001016 


012737 


000003 


403 


001024 


005212 




406 


001026 


oooooo 
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APT PARAMETER BLOCK 



015530 



177164 
177160 



BEGIN! 


MOV 


#-1 ###PASSPT 


j CLEAR THE ITERATION COUNTER 


PESTRTl 


CLR 


$MSGTY 






MOV 


»PWRDWN,24 


j SET UP THE POWER DOWN VECTOR 




MOV 


*340,26 


•SET UP POWER DOWN PRIORITY 




CLR 


STSTNM 






CLR 


SERROR 






MOV 


#8MSGTY,P2 




iSPECIAL CASE 


OF ODD > ,EVEN .BYTE 


AN'D REGISTER 6 


HERE»0 










JMP 


TST1 




Kit 









K2l 









K3t 









K4i 









K5| 









K6! 









K7i 


052525 






K10I 


052400 






Kill 









K12t 










I TEST 1 TEST AUTO INCREMENT AND DECREMENT OF R6 FOR WORD AND BYTES 
I **»««****»«»«»**«*«*»#»»«**#»«#««»»»**«**«*#«»»»»***»«»*«■«**«#*«**«««*#**»'»» 



******* 

******* 



000304 



INC 

CMP 

BNE 

CLR 

MOVB 

CMP 

BEG 

MOV 

INC 

HALT 



MOV 

MOVB 

CMP 

BEQ 

MOV 

INC 

HALT 



CLR 

MOVB 

CMP 

BEQ 

MOV 

INC 

HALT 



P#9TESTN .UPDATE TEST NUMBER 

«1,*U$TESTN j SEQUENCE ERROR? 

TST2-12 |BR TO ERROR HALT OK SEQ ERROR 
%6 

(6) + # HERE 'SIX SHOULD I NCREMEMT BY TWO 

%6,#2 

BPl 

8t,0#$FATAL ;MOVE TO M ATLBOX * ******* 1 #»«*»#» 

(R?) ;SET MSGTYP TO FATAL ERROR 

?R6 DID NOT AUTO INCREMENT BY TWO 
} TO SCOPE PEPLACE HALT W/ 240 
; AND REPLACF NEXT INST W/ 764 



#5000, %6 
-(6),#HERE 

%6,#776 
BP2 

#2, a#$FATAL 
(R2) 



%6 

(6)4-, (6) + 

%6,S4 

BR3 

#3,*#$FATAL 

CR2) 



; SHOULD DECREMENT BY TWO 



jMOVE TO MAILBOX 8 ******* 2 ******* 

t SET MSGTYP TO FATAL ERROR 

;P6 DID NOT AUTO DECREMENT BY 2 

j TO SCOPE REPLACE HALT W/ 240 

f AND PEPLACE NEXT TNST W/ 750 



; DOUBLES AUTO INCREMENT OF P6 



I MOVE TO MAILBOX # ******* 3 »*#*#** 
jSET MSGTYP jn FATAL ERPOR 
fWPONG AUTO INCREMENT OF R6 
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SEQ 0011 



407 








408 








409 








410 


001030 


005006 




411 


001032 


005004 




412 


001034 


122624 




413 


001036 


020627 


000002 


414 


001042 


001403 




41S 


001044 


012737 


000004 


418 


001052 


005212 




417 


001054 


000000 




418 








419 








420 








421 


001056 


005006 




422 


001060 


005004 




423 


001062 


122426 




424 


001064 


020627 


000002 


423 


001070 


001405 




426 


001072 


012737 


000005 


427 


001100 


005212 




428 


001102 


000000 




429 








430 








431 








432 


001 104 


005006 




433 


001 106 


005004 




434 


001110 


122624 




43S 


001112 


020427 


000001 


43S 


001116 


001405 




437 


001 120 


012737 


000006 


438 


001126 


005212 




439 


00U30 


000000 




440 








441 








442 


001132 


005006 




443 


001 134 


005004 




444 


001 136 


122426 




445 


001 140 


020627 


000002 


446 


001144 


001405 




447 


001 146 


012737 


000007 


448 


001 154 


005212 




449 


001156 


000000 




450 








451 








4S2 








4S3 


001 160 


005006 




4S4 


001 162 


005004 




455 


001 164 


122426 




456 


001166 


020427 


000001 


457 


001172 


001405 




458 


001174 


012737 


000010 


459 


001202 


005212 




460 


001204 


000000 




461 








462 









BR3I 



CLR 

CLS 

CMPB 

CMP 

BEQ 

MOV 

INC 

HALT 



CLR 

CLR 

CMPB 

CMP 

BEQ 

MOV 

INC 

HALT 



CLR 

CLR 

CMPB 

CMP 

BEQ 

MOV 

INC 

HALT 



CLR 

CLR 

CMPB 

CMP 

BEQ 

MOV 

INC 

HALT 



CLR 

CLR 

CMPB 

CMp 

BEQ 

MOV 

INC 

HALT 



%6 
%4 

(6)+,(4)+ 

%6,#2 
BR4 

#4,3»$FATAL 

CR25 



%6 
%4 

(4)+, (6)+ 

%6,S2 
BR5 

#5,9#$FATAL 

(R2) 



%6 
%4 

(6)+, (4)+ 

%4,#1 
BR6 

#6,(a*$FATAL 

CR25 



%6 

%4 

(45*, C6) + 
%6, #2 
BR7 

#7,e#$FATAL 

CP23 



%6 
%4 

C4)+t C6)+ 

%4»#1 
BRIO 

*10,<M$FATAL 

CR2) 



1 TO SCOPE REPLACE HALT W/ 240 
I AND REPLACE NEXT INST W/ 736 



t TEST INCREMENT OF R6 



j MOVE TO MAILBOX t **##*♦# 4 *#♦»♦«* 

I SET MSGTYP TO FATAL ERROR 

1 WRONG INCREMENT OF R6 

j TO SCOPE REPLACE HALT W/ 240 

j AND REPLACE NEXT INST W/ 723 



j TEST INCREMENT OF P6 



I MOVE TO MAILBOX # «*««»«« 5 **♦*##* 

jSET MSGTYP TO FATAL ERROR 
> WRONG INCREMENT OF R6 
j TO SCOPE REPLACE HALT W/ 240 
t AND REPLACE NEXT INST W/ 710 



1 TEST INCREMENT OF R4 



t MOVE TO MAILBOX * ******* 6 
jSET MSGTYP TO FATAL ERROR 
j WRONG INCREMENT OF R4 
; TO SCOPE REPLACE HALT W/ 240 
% AND REPLACE NEXT INST W/ 675 



J TEST INCREMENT OF R6 



f MOVE TO MAILBOX 8 ******* 7 
;SET MSGTYP TO FATAL ERROR 
•WRONG INCREMENT OF R6 
I TP SCOPE REPLACE HALT W/ 240 
j AND REPLACE NEXT INST W/ 662 



; TEST INCREMENT OF P4 



jMOVE TO MAILBOX # ******* 10 

jSET MSGTYP TO FATAL ERROR 

I WRONG INCREMENT OF R4 

j TO SCOPE REPLACE HALT WV 240 

f AND REPLACE NEXT INST W/ 647 



.MAIN, 


MACY1 1 


27(10065 


04«MAY 


DFKABC , 


PI 1 


33»MAY««77 


08|42 


463 








464 


001206 


012706 


001000 


465 


001212 


124627 


000000 


466 


001216 


022706 


000776 


467 


001222 


001405 




468 


001224 


012737 


000011 


469 


001232 


005212 




470 


001234 


000000 




471 








472 








473 








474 








475 








476 


001236 


005237 


000304 


477 


001242 


022737 


000002 


478 


001250 


001137 




479 


001252 


012767 


123456 


480 


001260 


012767 


050505 


481 


001266 


012705 


O00666 


482 


0012^2 


012706 


000676 


483 


001276 


112625 




484 


001300 


022767 


050456 


485 


001306 


001405 




486 


001310 


012737 


000012 


487 


001316 


005212 




488 


001320 


000000 




489 








490 








491 








492 


001322 


012767 


123456 


493 


001330 


012767 


050505 


494 


001336 


012705 


000666 


495 


001342 


012706 


000700 


496 


001346 


114625 




497 


001350 


026727 


177312 


498 


001356 


001405 




499 


001360 


012737 


000013 


500 


001366 


005212 




501 


001370 


000000 




502 








503 








504 








505 


001372 


012767 


123456 


506 


001400 


012767 


050505 


50? 


001406 


012705 


000666 


503 


001412 


012706 


000676 


509 


001416 


112526 




510 


001420 


022767 


050456 


511 


001426 


001405 




512 


001430 


012737 


000014 


513 


001436 


005212 




514 


001440 


000000 




515 








516 








517 








518 


001442 


012767 


123456 



08113 PAGE 12 

Tl TEST AUTO INCREMENT AND DECREMENT OF R6 FOR WORD AND BYTES 



} TEST DECREMENT OF PS 

j MOVE TO MAILBOX i ******* 1 1 ♦#♦**#» 
j SET MSGTYP TO FATAL ERROR 
; WRONG DECREMENT OF R6,0R WRONG STSTNM 
; TO SCOPE REPLACE HALT W/ 240 
1 AND REPLACE NEXT INST W/ 633 
I ************************************************************************************ 
I TEST 2 TEST TRANSFER OF .BYTE HSING R6 

t^»»*********************»*********************************************************** 



MOV 


#1000, %6 


CMPB 


»(6),#HERE 


CMP 


*776,%6 


BEQ 


TST2 


MOV 


#1 1,0*$FATAL 


INC 


(R2) 


HALT 





TST2I 



177416 
177400 



177360 
000302 



177346 
177330 



050456 
000302 



177266 
177270 



177250 
000302 



BR11I 



INC 
CMP 
BNE 
MOV 
MOV 
MOV 
MOV 
MOVB 
CMP 
BEQ 
MOV 
INC 
HALT 



MOV 

MOV 

MOV 

MOV 

MOVB 

CMP 

BEQ 

MOV 

INC 

HALT 



MOV 

MOV 

MOV 

MOV 

MOVB 

CMP 

BEQ 

MOV 

INC 

HALT 



9#STESTN j UPDATE TEST NUMBER 

#2#9#8TESTN • SEQUENCE ERROR? 

TST3-12 I BR TO ERROR HALT ON SEQ ERROR 
#123456, K5 
«050505,Kl 
#Kj,%5 
#Kg,%6 
(6)+, (5)+ 
#050456, Kl 
BRU 

#12ri«SFATAL 
(R2) 



#123456, K5 
«050505,Kl 

#Kl,%5 
#K6,%6 
»(6)# (55+ 
Kl, #050456 
BR12 

•13#?#SFATAL 

(R?5 



#123456, Kl 

#050505#KS 

•Ki,%5 

#K5#%6 

(5)+, (6)+ 

§050456, K5 

BR13 

#14#?#SFATAL 
(P2) 



J%5a(050505)Kj 
>%6=(123456)K5 
;LOW .BYTE OF RS TO R5 



12 



******* 



jMOVE TO MAILBOX f ******* 
jSET MSGTYP TO FATAL ERPOR 
; FALSE TRANSFER OF s BYTE 
j TO SCOPE REPLACE HALT W/ 240 
f AND REPLACE NEXT INST W/ 753 



I%5(050505)K1 
J%6(123456)K5 

;LOW .BYTE OF R6 TO R5 (DECREMENT) 



j MOVE TO MAILBOX S ******* 1 3 ««***«« 

f SET MSGTYP TO FATAL ERROR 

f FALSE R6 .BYTE TRANSFER 

j TO SCOPE REPLACE HALT W/ 240 

; AND REPLACE NEXT INST W/ 727 



1(123456) 
f (050505) 

SLOW OF R5 TO LOW OF 



I MOVE TO MAILBOX # #**#**« |4 

I SET MSGTYP TO FATAL ERROR 

; FALSE R6 .BYTE TRANSFER 

j TO SCOPE REPLACE HALT W/ 240 

j AND REPLACE NEXT INST W/ 703 



177216 BR13I 
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DFKABC.PU 03-MAY-77 0B|42 T2 TEST TRANSFER OF .BYTE USING R6 SEQ 0013 



519 


001 450 


012767 


030503 


520 


001 436 


01 2705 


000667 


521 


001 462 


012706 


000676 


522 


001 466 


1 12526 




523 


001470 


02672? 


177202 


924 


001476 


001403 




325 


001300 


012737 


000013 


526 


001306 


005212 




527 


001510 


000000 




528 








529 








330 








531 


00151 2 


01 2767 


123436 


332 


001520 


012767 


050303 


533 


001526 


01 2703 


000667 


534 


001532 


012706 


000676 


533 


001536 


1 12625 




536 


001540 


022767 


042456 


537 


001 346 


001405 




538 


001550 


012737 


000016 


539 


001 556 


003212 




540 


001360 


000000 




541 








542 








543 








544 








545 








346 


001562 


005237 


000304 


547 


001566 


022737 


000003 


348 


001574 


001 103 




549 




126767 


177100 


530 


001 604 


001 403 




551 


001606 


0127 37 


000017 


552 


001614 


005212 




353 


001616 


000000 




354 








355 








336 








557 


001620 


126767 


177037 


338 


001 626 


001403 




559 


001630 


012737 


000020 


360 


UUJDJO 


005212 




561 


0Q1640 


000000 




362 








363 








564 








365 


001642 


126767 


177037 


566 


001650 


001403 




367 


001652 


012737 


000021 


368 


001660 


005212 




369 


001662 


000000 




370 








571 








572 








373 


001664 


126767 


177014 


574 


001672 


001405 





177220 



030647 
000302 



177146 
177150 



177120 
000302 



000304 
177077 
000302 



177054 
000302 



177032 
000302 



177006 BRl 7 I 



MOV 

MOV 

MOV 

MOVB 

CMP 

BEQ 

MOV 

INC 

HALT 



MOV 
MOV 
MOV 
MOV 
MOVB 
CMp 
BEQ 
MOV 
INC 
HALT 



#050505, K5 
iKl+1,%5 
#K5#%6 
(5)+, (63+ 
K5, #050647 
BP14 

# 15»@«SFATAL 
CR23 



*123456.K1 
•050505, K5 

#Ki+l,%5 
#K§,%6 
(6)+, (53+ 
#042456, Kl 
TST3 

«16,3#SFATAL 

(R2) 



1123456 
1050505 

j HIGH OF R5 TO LOW OF 



t MOVE TO MAILBOX # ««««»*« 15 

> SET MSGTYP TO FATAL ERROR 

f FALSE R6 .BYTE TRANSFER 

> TO SCOPE REPLACE HALT W/ 240 

j AND REPLACE NEXT INST W/ 657 



>R5»123456»0DD ADORESS 
I R6»050505«»,EVEN ADDRESS 
jLOW OF R6 TO HIGH OF R5 



j MOVE TO MAILBOX » ******* 16 ******* 

* SET MSGTYP TO FATAL ERROR 

1 FAILED LOW OF 6 TO HIGH OF 5, OR WRONG STSTNM 
% TO SCOPE REPLACE HALT W/ 240 
j AND REPLACE NEXT INST W/ 633 

I 

I TEST 3 TEST BYTE OPERATION WITH SEQUENTIAL ODD-EVEN ADDRESS 

I ####*#*##********#******#******#*##*##*****»##*#*#*####*##*****#*#*************#*#** 



TST3! 



INC 
CMP 
BNE 
CMPB 
BEQ 
MOV 
INC 
HALT 



CMPB 

BEQ 

MOV 

INC 

HALT 



CMPB 

BEQ 

MOV 

INC 

HALT 



CMPB 
BEQ 



§#8TESTN j UPDATE TEST NUMBER 

#3,0«STESTN % SEQUENCE ERROR? 

TST4-12 f BR TO ERROR HALT ON SEQ ERPOR 



K7, K7-H 
BR15 

#17,3#8FATAL 
CR2) 



K7+1,K7 

BR16 

#20#9#8FATAL 
£R23 



K10+1,K7 

BR17 

#2l,P«SFATAL 

(R2) 



KICKS 
BR20 



; SAME .WORD LOW TO HIGH 



1? 



jMOVE TO MAILBOX # ******* 
»SET MSGTYP TO FATAL ERROR 
j SHOULD COMPARE LOW TO HIGH 
I TO SCOPE REPLACE HALT W/ 240 
I AND REPLACE NEXT INST W/ 766 

f COMPARE ODD TO .EVEN SAME .WORD 

I MOVE TO MAILBOX f ******* 20 
I SET MSGTYP TO FATAL ERROR 
• ODD TO .EVEN .BYTE FAILURE 
» TO SCOPE REPLACE HALT W/ 240 
? AND REPLACE NEXT INST W/ 755 

> SEQUENTIAL .BYTES 

jMOVE TO MAILBOX « ******* 21 
I SET MSGTYP TO FATAL ERROR 
jODD TO , EVEN FAILED 
f TO SCOPE REPLACE HALT W/ 240 
I AND REPLACE NEXT INST W/ 744 



.MAIN. 


MACY11 


27(1006! 


DFKABC, 


5 P11 03«MAY»7* 


575 


001674 


012737 


576 


001702 


005212 


577 


001704 


000000 


578 






579 






580 


001706 


126767 


581 


001714 


001405 


382 


001716 


012737 


583 


001724 


005212 


584 


001726 


000000 


385 






586 






587 






588 


001730 


126767 


589 


001736 


001005 


590 


00J740 


012737 


591 


001746 


005212 


592 


001750 


000000 


593 






394 






595 






596 


001752 


126767 


597 


001760 


001403 


398 


001762 


012737 


399 


001770 


005212 


600 


001772 


000000 


601 






602 






603 






604 


001774 


126767 


605 


002002 


001005 


606 


002004 


012737 


607 


002012 


003212 


608 


002014 


000000 


609 






610 






611 






612 






613 






614 






615 






616 


002016 


005237 


617 


002022 


022737 


618 


002030 


001062 


619 


002032 


000277 


620 


002034 


005067 


621 


002040 


10300S 


623 


002042 


012737 


623 


002050 


005212 


624 


002052 


000000 


625 






626 






627 


002054 




628 


002054 


102005 


629 


002036 


012737 


630 


002064 


005212 
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T3 TEST BYTE OPERATION WITH SEQUENTIAL ODD-EVEN ADDRESS 



SEQ 0014 



000022 000302 



176771 
000023 



176750 
000024 



176727 
000025 



176704 
000026 



176771 
000302 



176747 
000302 



176723 
000302 



176701 
000302 



000304 

000004 



173736 
000027 



BR20I 



BR211 



BR221 



MOV 

INC 
HALT 



CMPB 

BEQ 
MOV 
INC 
HALT 



CMPB 

BNE 

MOV 

INC 

HALT 



CMPB 

BEQ 

MOV 

INC 

HALT 



CMPB 

BNE 

MOV 

INC 

HALT 



#22i $«FATAL 
(R23 



K7*l»Kl0*i 
BR21 

#23,$88FATAL 
£R2> 



K10#K10+1 
BR22 

*24r f»8FATAL 

(R2) 



Kl0+1,K10+1 

BR23 

#25#9t$FATAL 

£*2) 



K1CK7-M 
TST4 

#26,?#$FATAL 
(R2) 



I MOVE TO MAILBOX » ******* 22 ******* 

j SET MSGTYP TO FATAL ERROR 
% .EVEN TO EVEN FAILED 
I TO SCOPE REPLACE HALT W/ 240 
f AND REPLACE NEXT INST W/ 733 



jMOVE TO MAILBOX • ******* 23 

I SET MSGTYP TO FATAL ERROR 

t ODD TO ODD FAILED 

; TO SCOPE REPLACE HALT W/ 240 

I AND REPLACE NEXT INST W/ 722 



24 



I MOVE TO MAILBOX I ******* 
I SET MSGTYP TO FATAL ERROR 
|LOW TO HIGH IN SAME . WORD FAILED 
I TO SCOPE REPLACE HALT W/ 240 
I AND REPLACE NEXT INST W/ 711 



I MOVE TO MAILBOX » ***###* 25 * 
f SET MSGTYP TO FATAL ERROR 
I HIGH TO LOW IN SAME .WORD FAILED 
1 TO SCOPE REPLACE HALT W/ 240 
f AND REPLACE NEXT INST W/ 700 



j MOVE TO MAILBOX « 26 

1 SET MSGTYP TO FATAL ERROR 

j .EVEN TO ODD FAILED, OR WRONG STSTNM 

I TO SCOPE REPLACE HALT W/ 240 

; AND REPLACE NEXT INST W/ 667 



I TEST 4 TEST THE CC BITS 



000030 000302 



INC 
CMP 
BNE 
SCC 
CLR 
BCC 
MOV 
INC 
HALT 



BVC 

MOV 
INC 



9ISTESTN j UPDATE TEST NUMBER 

«4,P#$TESTN j SEQUENCE ERROR? 

TST5-12 I BR TO ERROR HALT ON SEQ ERROR 
iSET STATUS 
I CLEAR STATUS 



STATUS 
BR33 

#27,P#3FATAL 

£*2/3 



BR34 

830,»«$FATAL 
(R2) 



f MOVE TO MAILBOX ******* 
iSET MSGTYP TO FATAL ERROR 
|C NOT CLEAR 

I TO SCOPE REPLACE HALT W/ 240 
j AND REPLACE NEXT INST W/ 766 



f MOVE TO MAILBOX » ******* 
t SET MSGTYP TO FATAL ERROR 



27 



.MAIN, 


HACY11 
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04»MAY< 


-77 08113 PAGE 


15 








DFR&SCg 


Pli Q3»MAY«77 


08142 




T4 


TEST 


THE CC BITS 




SEO 


631 


002066 


Art A AAA 








HALT 




fV NOT CLEAR 




632 
















f TO SCOPE REPLACE HALT W/ 240 




633 
















j AMD REPLACE NEXT INST W/ 760 




634 


00*070 








BR34i 










635 


a no a *i f\ 

DOiO 1 U 


An 1 nnt 








BNE 


BR35 






636 


OQZ072 


01 2737 


00003S 


000302 




MOV 


#3! ,P#«FATAL 


j MOVE TO MAILBOX « ####### 31 


«#»**** 


637 


A A9 * Art 










INC 


(R2) 


I SET MSGTYP TO FATAL ERROR 




638 


00*! U<s 


A AAAAA 








HALT 




jZ NOT CLEAR 




639 
















; TO SCOPE REPLACE HALT W/ 240 




640 
















i AND REPLACE NEXT INST W/ 752 




64! 


002104 








BP35I 










642 


002104 


ioooos 








BPL 


BR36 






643 


002106 


012737 


000032 


000302 




MOV 


#32,0#gFATAI, 


jMOVE TO MAILBOX # *#####*• 32 


««»*»»« 


644 


0021 1 4 


00521 2 








INC 


CP2) 


1 SET MSGTYP TO FATAL ERROR 




643 


002116 


000000 








HALT 




jN NOT CLEAR 




646 
















j TO SCOPE REPLACE HALT W/ 240 




64? 
















J AND REPLACE NEXT INST W/ 744 




648 




000297 






BR36I 


CCC 




iCLEAR CONDITION CODES 




649 


002132 


032767 


000017 


173646 




BIS 


* 1 7 # STATUS 


j SET STATUS TO ONES 




630 
631 


in 


a?97>i 








BCS 


BP37 






632 


aa9 *9 




000033 


000302 




MOV 


#33»P#$FATAL 


j MOVE TO MAILBOX # #«*«*#« 33 




653 


aa9« Art 


005212 








INC 


CR2) 


ISET MSGTYP TO FATAL ERROR 




634 


0021 42 


000000 








HALT 




tC NOT SET 




635 
















» TO SCOPE REPLACE HALT W/ 240 




656 
















1 AND REPLACE NEXT INST W/ 732 




65? 


002144 








BR37I 










658 


aa9 I ii 


102403 








BVS 


BP40 






689 


002 1 46 


01 2737 


000034 


000302 




MOV 


#34,3i$FATAL 


jMOVE TO MAILBOX « ####*## 34 


##«#*«« 


660 


aao! 










INC 


(R2) 


ISET MSGTYP TO FATAL ERROR 




661 


002136 


AAA A Art 








HALT 




jV NOT SET 




662 
















5 TO SCOPE REPLACE HALT W/ 240 




663 
















j AND REPLACE NEXT INST W/ 724 




664 


002160 








BR40I 










665 


002 160 


Aft 1 40*5 








BEQ 


BR41 






666 




01 2737 


000035 


000302 




MOV 


#35#P»SFATAL 


>MOVE TO MAILBOX « «*«»«*« 35 


»*»*##« 


66? 


0021 70 










INC 


CR2) 


;SET MSGTYP TO FATAL ERROR 




668 


002 1 7 2 


A A A A A A 








HALT 




|Z NOT SET 




669 
















t TO SCOPE REPLACE HALT W/ 240 




670 
















I AND REPLACE NEXT INST W/ 716 




671 


002174 








BR41I 










672 


002l?4 


10040S 








BMI 


TST5 






673 




01273? 


000036 


000302 




MOV 


*36,f»#$FATAL 


jMOVE TO MAILBOX « »«*#*•« 36 


#**###♦ 


674 


AA94A A 










INC 


(R2) 


j SET MSGTYP TO FATAL ERROR 




673 


UUcjUB 


A A A AA A 

UUUUUU 








HALT 




;N NOT SET, OR WRONG STSTNM 




676 
















} TO SCOPE REPLACE HALT W/ 240 




677 
















% AND REPLACE NEXT INST W/ 710 




678 












679 










f TEST 3 


TEST 


THAT A TRAP OCCURS 


ON A RESERVED INSTRUCTION 




680 












681 


002210 


005237 


000304 




TST3I 


INC 


§#$TESTN 


1 UPDATE TEST NUMBER 




682 


002214 


022737 


000005 


000304 




CMP 


#5,P#STESTN 


1 SEQUENCE ERROR? 




683 


002222 


001006 








BNE 


RETA 


f BR TO ERROR HALT ON SEO ERROR 




684 


002224 


012706 


000300 






MOV 


#BUFF,SP 


JSTACK POINTER SETUP 




683 


002230 


012767 


002232 


S73332 




MOV 


*PETAH,PTRAP 


j RETURN LOCATION 




686 


002236 


000007 








TRAPA 




i RESERVED INSTRUCTION, SHOULD TRAP 
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DFKABC ,P1 1 ( 


33»MAY»7? 
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TS TEST 


THAT A TRAP OCCURS 


ON A RESERVED INSTRUCTION SEO 


687 


002240 








RETAf 






688 


002240 


012737 


000037 


000302 


MOV 


*37,#86FATAL 


;MOVE TO MAILBOX « •*#«### 37 *«««««* 


689 


002246 


005212 






INC 


CR2) 


jSET MSGTYP TO FATAL ERROR 


690 


002230 


000000 






HALT 




1 RESERVE INSTRUCTION DIDN'T TRAP, OR WRONG STSTNM 


691 














t TO SCOPE REPLACE HALT W/ 240 


692 














J AND REPLACE NEXT INST W/ 764 


693 


002252 








PETAHj 






694 










f #*««*«*«*««»»«#«*#***##«*#***»«*•«*•««»«*»«»#*«»#*««»«««»«*»«**»«**«**««««»»»«*#*»»« 


69«5 










I TEST 6 TEST 


DECREMENT OF STACK 


POINTER ON A TRAP OPERATION 


696 










I »####»#####»############*#########*###*#####^ 


69? 


002232 


005237 


000304 




TST6I INC 


PIJTESTN 


1 UPDATE TEST NUMBER 


698 


002236 


022737 


000006 


000304 


CMP 


#6,8#8TESTN 


1 SEQUENCE ERROR? 


699 


002264 


001011 






BNE 


TST7-12 j BR TO 


ERROR HALT ON SEQ ERROR 


700 


002266 


012706 


000500 




MOV 


#BUFF,SP 


t STACK POINTER SETUP 


701 


002272 


012767 


002302 


175510 


MOV 


IRETB, RTRAp 


1 RETURN POINTER 


702 


002300 


000007 






TRAPA 




j RESERVED INSTRUCTION 


703 


002302 


020627 


000474 




PETBi CMP 


SP,#BUFF»4 


1 TEST DECPEMENT OF SP 


704 


902306 


001405 






BEQ 


TST7 




70S 


002310 


012737 


000040 


000302 


MOV 


#40»a#SFATAL 


I MOVE TO MAILBOX t «»**»»« 40 ***#### 


706 


002316 


005212 






INC 


(R2> 


;SET MSGTYP TO FATAL ERROR 


707 


002320 


000000 






HALT 




?NOT DECREMENTED TWO WORDS, OR WRONG STSTNM 


708 














? TO SCOPE REPLACE HALT W/ 240 


709 














t AND REPLACE NEXT INST W/ 761 


710 












711 










I TEST 7 TEST 


THAT PROPER P.C. IS SAVED 


712 










f 


713 


002322 


005237 


000304 




TST7I INC 


8*$TESTN 


T UPDATE TEST NUMBER 


714 


002326 


022737 


000007 


000304 


CMP 


#7,®#8TESTN 


; SEQUENCE ERROR? 


7JS 


002334 


001012 






BNE 


TST10»12 


f BR TO ERROR HALT ON SEQ ERROR 


716 


002336 


012706 


000500 




MOV 


#BUFF,SP 


jSTACK POINTER SETUP 


71? 


002342 


Of2767 


002332 


175440 


MOV 


#RETC,RTPAP 


t RETURN FROM TRAP POINTER 


718 


002350 


00000? 






INSTCl TRAPA 




t TRAP ON THIS INSTRUCTION 


?lf 


002352 


022767 


002332 


176114 


RE?C! CMP 


# 9 ,BUFF»4 


f CHECK FOR INCREMENTED P.C. 


720 


002360 


001403 






BEQ 


TST10 




721 


002362 


01273? 


000041 


000302 


MOV 


*4l,?*$FATAL 


jMOVE TO MAILBOX • ««*»#»« 41 *»##*## 


722 


002370 


003212 






INC 


(R2) 


ISET MSGTYP TO FATAL ERROR 


723 


002372 


000000 






HALT 




1 INCORRECT P.C,, OR WRONG STSTNM 


724 














7 TO SCOPE REPLACE HALT W/ 240 


723 














t AND REPLACE NEXT INST W/ 760 


726 












72? 










fTEST 10 


TEST THAT "OLD" 


CC AND PRIORITY ARE PLACED ON STACK 


728 










I *«»*•»*««*««*»*»*«»•«•#««*»**««»*»#«*#•*»«*««*««««**««#«*««««#»»*«»*»»«»»»«#««»*««*« 


729 


002374 


005237 


000304 




TSTlOi INC 


9#$TESTN 


» UPDATE TEST NUMBER 


730 


002400 


022737 


000010 


000304 


CMP 


#10#£#STESTN 


f SEQUENCE ERROR? 


731 


002406 


001040 






BNE 


TST11-12 


|BP TO ERROR HALT ON SEQ ERROR 


732 


002410 


012706 


000300 




MOV 


#BUFF,SP 


f SET UP 


733 


002414 


01276? 


002432 


175366 


MOV 


• RETD, RTR AP 


:SET UP 


734 


002422 


003067 


173350 




CLR 


CC 


1 CLEAR CC AND PRIORITY 


733 


002426 


000237 






CCC 






736 


002430 


000007 






TRAPA 




j TRAP 


73? 


002432 


026727 


176040 


000000 


RETDi CMP 


BUFF»2##0 


i TEST THAT OLD STATUS WENT TO STACK 


738 


002440 


001403 






BEQ 


13 




739 


002442 


012737 


000042 


000302 


MOV 


#42» §#SFATAL 


|MOVE TO MAILBOX * *#♦*### 42 ##***## 


740 


002430 


003212 






INC 


(P2) 


;SET MSGTYP TO FATAL ERROR 


741 


002432 


000000 






HALT 




1 INCORRECT STATUS 


742 














; TO SCOPE REPLACE HALT W/ 240 



• MAIN a 


MACYil 


27(1006) 


04 B MAY 


»77 08113 P&6I 


17 








DFKABC 


PH 03»MAY»77 


08 8 42 




T10 


f f gf 


THAT "OLD* CC AND 




SEQ 


743 
















I AND REPLACE NEXT INST W/ 755 




f «s«» 


002434 


012706 


n fins on 




its 


MOV 


amis"? . so 

W O UP * , or 


1 up 




745 


002460 


012767 


vu<*vv 


175322 




MOV 


#RETE, RTRAP 


fSET UP 




746 


002466 


012767 


000337 


173302 




MOV 


#357, CC 


fSET PRIORITY 




747 


002474 


000277 








sec 




fSET CC 




748 


002476 


000007 








TRAP& 




1 f pAP 




749 


002^00 


026727 


17S772 


000337 


rete t 


CMP 


owe » , w *I9 / 


1 COMPARES STATUS ON STACK 




750 


002906 


001403 








BEQ 


TST1 1 






79S 


002910 


012737 


AAAA4 1 


000302 




MOV 


ill, lilflTlTi 


1 MOVE TO MAILBOX # ##•#### 43 




792 


002516 


003212 








INC 


IR2) 


j SET MSGTYP TO FATAL ERROR 




753 


002920 


000000 








HALT 




f INCORRECT STATUS ON STACK, OR WRONG $TSTNM 


















I TO SCOPE REPLACE HALT W/ 240 




759 
















% AND REPLACE NEXT INST W/ 732 




TS5& 










i 


757 










I TEST 11 


TEST THAT "NEW 


STATUS IS CORRECT 




758 












759 


002922 


005237 


aaa?aa 




Tofl 1 1 


INC 




} UrUATt Ibsl NUMBER 




760 


002926 


022737 


VVUV 1 it 


ft Aft 9 ft A 




CMP 


ill* VISTbSin 


ISSiQUernCci EnrORr 




761 


002934 


001121 










STPP 


a BB fn rDBnn uif.n nu un coons 
f DK ID E.KKUK HAuT UN ObQ EKKQK 




763 


002936 


012706 


aaa5 aa 






MOV 


foUFF, SP 






763 


002942 


012767 


002556 


175240 






VKETr , KTHAr 






764 


002930 


009067 


173236 






CLR 




1 TTilP&O VtlTlTDV DBTHBTTV iMH PC 




755 


002934 


000007 








TRAP A 








766 


002996 








nPigggi '„ 

KfcTr 8 






| Te<ST fun "C " CtiEAKKD 




767 


002936 


100003 








BPL 


1 8 






768 


002360 


012737 


aaaa&& 


A AA1 A 4 






»44» »ff®F«TAIi 


| nu V& TO *)AILdua # #»###♦# 44 




769 


002366 


003212 








INC 


CR2) 


f SET MSGTYP TO FATAL ERROR 




770 


002370 


000000 








HALT 




~ at lmm «i Pi own 

1 N NOT CLEARED 




77 1 
















f TO SCOPE REPLACE HALT W/ 240 




772 
















e iun orDT.artr ms*vt that u / T k < 




ill 


002912 








« 

111 










774 


002372 


00100S 








BNE 


2$ 






f /» 


002974 


012737 




AAft1A9 
OODJvj 




MOV 


#49 , §#IFAT AL 


iHOVE TO MAILBOX # #♦##### 43 




776 


002602 


003212 








INC 


CR23 


1 SET MSGTYP TO FATAL ERROR 




11 1 


002604 


000000 








HALT 




jZ NOT CLEARED 




778 
















i TO SCOPE REPLACE HALT W/ 240 




779 
















I AND REPLACE NEXT INST W/ 753 




780 


002606 








2$l 










78 S 


002606 


102003 








BVC 


38 






783 


002610 


012737 


A AO AAA 


AAA 4 AO 

000 Jv2 




MOV 


#46,8MFATAL 


|M0VE TO MAILBOX • 46 


####### 


783 


002616 


003212 








INC 


(R2) 


1 SET MSGTYP TO FATAL ERROR 




784 


002620 


000000 








HALT 




|V NOT CLEARED 




783 
















I TO SCOPE REPLACE HALT W/ 240 




716 
















f AND REPLACE NEXT INST W/ 745 




787 


002622 








3$S 










788 


002622 


103003 








BCC 


4$ 






789 


002624 


012737 


AAAA A*7 


000303 




MOV 


#47»t#SFATAL 


|M0VE TO MAILBOX f #«###»# 47 




790 


002632 


003212 








INC 


CR25 


fSIT MSGTYP TO FATAL ERROR 




79i 


002634 


000000 








HALT 




|C NOT CLEARED 




792 
















I TO SCOPE REPLACE HALT W/ 240 




793 
















% AND REPLACE NEXT INST W/ 737 




794 


002636 


032767 


000340 


175132 


4$l 


BIT 


#340»CC 


I TEST PRIORITY 




793 


902644 


001403 








BEQ 


5$ 






796 


002646 


012737 


000030 


000302 




MOV 


#50,f#SFATAL 


f MOVE TO MAILBOX f 30 




797 


002634 


009212 








INC 


<R2) 


1 SET MSGTYP TO FATAL ERROR 




798 


002696 


000000 








HALT 




1 PRIORITY NOT ZERO 





•MAIN, MACY11 27C1006) 04-MAY-77 08113 PAGE 18 



DFKABC . 


Pll 03-MAY-77 


08142 




Til 


TEST 


THAT "NEW" STATUS 


IS CORRECT 


SEQ 


799 
















} TO SCOPE REPLACE HALT W/ 240 




800 
















I AND REPLACE NEXT INST W/ 726 




801 


002660 


012706 


000300 




56 1 


MOV 


#BUFF,SP 






302 


002664 


012767 


002702 


175116 




MOV 


«RETG,RTRAP 






803 


002672 


012767 


000357 


175112 




MOV 


#357»RTRAP+2 


} SET NEW "CC" AND PRIORITY 




804 


002700 


000007 






RETGi 


TRAPA 




1 TRAP HERE 




803 


002702 
















806 


002702 


10040S 








BMI 


IS 






807 


002704 


012737 


000051 


000302 




MOV 


#5li WFATAL 


|M0VE TO MAILBOX # *««**»• 51 




80S 


002712 


003212 








INC 


CR25 


I SET MSGTYP TO FATAL ERROR 




309 


002714 


000000 








HALT 




}N NOT SET 




810 
















1 TO SCOPE REPLACE HALT W/ 240 




811 
















f AND REPLACE NEXT INST W/ 707 




812 


002716 








Hi 










813 


002716 


001403 








BEQ 


2$ 






814 


002720 


012737 


000052 


000302 




MOV 


S52#t##FATAL 


f MOVE TO MAILBOX # 52 




813 


002726 


005212 








INC 


CR2> 


\ SET MSGTYP TO FATAL ERROR 




816 


002730 


000000 








HALT 




iZ NOT SET 




817 
















; TO SCOPE REPLACE HALT W/ 240 




818 
















I AND REPLACE NEXT INST W/ 701 




819 


002732 








%%'% 










820 


002732 


102405 








BVS 


3$ 






821 


002734 


012737 


000053 


000302 




MOV 


#53»t#0FATAL 


jMOVE TO MAILBOX * *#«»«#» 53 




822 


002742 


005212 








INC 


CR2) 


f SET MSGTYP TO FATAL ERROR 




823 


002744 


000000 








HALT 




|V NOT SET 




824 
















1 TO SCOPE REPLACE HALT W/ 240 




823 
















1 AND REPLACE NEXT INST W/ 673 




826 


002746 








3§S 










827 


002746 


103403 








BCS 


41 






828 


002750 


012737 


000034 


000302 




MOV 


#54#§#SFATAL 


1 MOVE TO MAILBOX # 34 




829 


002756 


003212 








INC 


CR2) 


t SET MSGTYP TO FATAL ERROR 




830 


002760 


000000 








HALT 




|C NOT SET 




831 
















I TO SCOPE REPLACE HALT W/ 240 




832 
















I AND REPLACE NEXT INST W/ 665 




833 


002762 


016706 


175010 




4$S 


MOV 


CC,Sf> 






834 


002766 


042706 


000017 






SIC 


•17#SP 






833 


002772 


022706 


000340 






CMP 


I340# SP 






836 


002776 


001405 






STPgf 


BEQ 


STPPA 






837 


Q03Q00 
















838 


003000 


012737 


000055 


000302 




MOV 


#S3,#«f&TMi 


I MOVE TO MAILBOX # *«*•»«« 55 




839 


003006 


005212 








INC 


CR2) 


} SET MSGTYP TO FATAL ERROR 




840 


003010 


000000 








HALT 




1 PRIORITY WAS CHANGED, OR WRONG ITSTNM 


841 
















1 TO SCOPE REPLACE HALT W/ 240 




842 
















f AND REPLACE NEXT INST W/ 651 




843 


003012 


012767 


000012 


174770 


8TPP&8 


MOV 


112*10 






844 


003020 


003067 


174766 






CLR 


12 






843 










1 


846 










1 TEST 


12 


TEST THAT A TRAP OCCURS FOR A "TRAP" INSTRUCTION 




347 










% 


348 


003024 


005237 


000304 




TST12S 


INC 


fiSTESTN 


1 UPDATE TEST NUMBER 




349 


003030 


022737 


000012 


000304 




CMP 


#12» 8MTESTN 


f SEQUENCE ERROR? 




830 


003036 


001013 








3NE 


T3T13-12 


I BR TO ERROR HALT ON SEQ ERROR 




891 


003040 


012767 


000012 


174742 




MOV 


#12*10 






832 


003046 


005067 


174740 






CLR 


12 






153 


003052 


012706 


000500 






MOV 


#BUFF,SP 


1 STACK POINTER SETUP 




834 


003056 


012767 


003100 


174750 




MOV 


*RETAl, RTRAP1 


f RETURN LOCATION 





.MAIN. MACYll 27C1006) 04-MAY-77 08113 PAGE 19 

DFKABC.PU 03-MAY-77 08142 T12 TEST THAT A TRAP OCCURS FOR A "TRAP" INSTRUCTION 



SEQ 0019 



855 


003064 


104400 






TRAP 




j RESERVED INSTRUCTION, SHOULD TRAP 


836 


003066 


012737 


000036 


000302 


MOV 


#56# 8#$FATAL 


|MOVE TO MAILBOX # ******* 56 ******* 


857 


003074 


005212 






INC 


CR2) 


?SET MgGTYP TO FATAL ERROR 


858 


003076 


000000 






HALT 




1 TRAP DIDN'T TRAP, OR WRONG STSTNM 


839 














1 TO SCOPE REPLACE HALT W/ 240 


860 














j AND REPLACE NEXT INST W/ 757 


861 


003100 








RETA1 | 






862 










t «««*******««»«#««***»««*«*«*****»**«««»*#**««#«««««»«»«*#*«#»*«»**«*#«**««««*««*««*» 


863 










f TEST 13 


TEST DECREMENT 


OF STACK POINTER ON A TRAP OPERATION 


864 










$***»**************************************************»***************************** 


865 


003100 


005237 


000304 




TST13I INC 


l#3TESTN 


f UPDATE TEST NUMBER 


866 


003104 


022737 


000013 


000304 


CMP 


#13,P#$TESTN 


1 SEQUENCE ERROR? 


867 


003112 


001011 






BNE 


TST14-12 


?BR TO ERROP HALT ON SEQ ERROR 


868 


003114 


012706 


000500 




MOV 


#BUFF,SP 


jSTACK POINTER SETUP 


869 


003120 


012767 


003130 


174706 


MOV 


#RETBj , RTRAPl 


t RETURN POINTER 


870 


003126 


104400 






TRAP 




I RESERVED INSTRUCTION . 


871 


003130 


020627 


000474 




RETBll CMP 


SP,#BUFF™4 


1 TEST DECREMENT OF SP 


872 


003134 


001405 






BEQ 


TST14 




873 


003136 


012737 


000057 


000302 


MOV 


#57i0*3FATAL 


j MOVE TO MAILBOX # **«*«*« 57 ******* 


874 


003144 


005212 






INC 


C*2) 


JSET MSGTYP TO FATAL ERROR 


875 


003146 


000000 






HALT 




I NOT DECREMENTED TWO WORDS, OR WRONG $ TSTNM 


376 














? TO SCOPE REPLACE HALT W/ 240 


877 














t AND REPLACE NEXT INST W/ 761 


878 












879 










j TEST 14 


TEST THAT PROPER P.C, IS SAVED 


880 










1 «•***»*•**«»*«»««»««#«»#**»##*»**«««*#*#*«»*«##**#»««**##««»##«##«*«««*«**»«*«#«»*«* 


881 


003130 


005237 


000304 




TST14I INC 


£#$TESTN 


r UPDATE TEST NUMBER 


882 


003154 


022737 


000014 


000304 


CMP 


#14#9#8TESTN 


f SEQUENCE ERROR? 


883 


003162 


001012 






BNE 


TST15-12 


I BR TO ERROP HALT ON SEQ ERROR 


884 


003164 


012706 


000300 




MOV 


#BUFF,SP 


i STACK POINTER SETUP 


885 


003170 


012767 


003200 


174636 


MOV 


#RETC1, RTRAPl 


I RETURN FROM TRAP POINTER 


886 


003176 


104400 






TRAP 




I TRAP ON THIS INSTRUCTION 


887 


003200 


022767 


003200 


175266 


RETCl 1 CMP 


# 9 ,BUFF»4 


f CHECK INCREMENTED P.C. 


888 


003206 


001405 






BEQ 


TST15 




889 


003210 


012737 


000060 


000302 


MOV 


#60# ?#$FATAL 


?MOVE TO MAILBOX f ******* 60 


890 


003216 


005212 






INC 


(R2) 


j SET MSGTYP TO FATAL ERROR 


891 


003220 


000000 






HALT 




1 INCORRECT P.C., OR WRONG $TSTNM 


892 














1 TO SCOPE REPLACE HALT W/ 240 


893 














t AND REPLACE NEXT INST W/ 760 


894 










1 


895 










1 TEST 15 


TEST THAT "OLD" 


CC AND PRIORITY ARE PLACED ON STACK 


896 










1 **********»*******»****^**************************»*************»*********»********* 


897 


003222 


005237 


000304 




TST15I INC 


M$TESTN 


1 UPDATE TEST NUMBER 


898 


003226 


022737 


000015 


000304 


CMP 


#15#P#$TESTN 


1 SEQUENCE ERROR? 


899 


003234 


001037 






BNE 


TST16-12 


j BR TO ERROR HALT ON SEQ ERROR 


900 


003236 


012706 


000500 




MOV 


#BUFF,SP 


jSET UP 


901 


003242 


012767 


003260 


174564 


MOV 


#RETDl, RTRAPl 


jSET UP 


902 


003250 


005067 


174522 




CLR 


CC 


j CLEAR CC AND PRIORITY 


903 


003254 


000257 






CCC 






904 


003256 


104400 






TRAP 




jTRAP 


905 


003260 


026727 


175212 


000000 


RETDli CMP 


BUFF«2,#0 


j TEST THAT OLD STATUS WENT TO STACK 


906 


003266 


001405 






BEQ 


1« 




907 


003270 


012737 


000061 


000302 


MOV 


#6 1 # 3FATAL 


jMOVE TO MAILBOX # 61 


908 


003276 


005212 






INC 


(R2) 


t SET MSGTYP TO FATAL ERROR 


909 


003300 


000000 






HALT 




> INCORRECT STATUS 


910 














f TO SCOPE REPLACE HALT W/ 240 



.MAIN, 


MACY11 


27(1006) 


04»MAY«77 08 


113 PAGE 


20 








DFKABC 


.PI 1 03-MAY-77 


08142 




T15 


TEST 


THAT "OLD" CC AND 


PRIORITY ARE PLACED ON STACK 


SEQ 


911 
















J AND REPLACE NEXT INST W/ 755 




912 


003302 


012706 


000500 




IS 8 


MOV 


#BUFF,SP 


iSET UP 




913 


003306 


012767 


003324 


174520 




MOV 


#PETEl, RTRAPl 


?SET UP 




914 


003314 


012767 


000357 


174454 




MOV 


#357, CC 


ISET PRIORITY 




915 


003322 


104400 








TRAP 




} SET CC 




916 


003324 


026727 


175146 


000357 


RETEll 


CMP 


BUFF«-2»#357 


j COMPARES STATUS ON STACK 




917 


003332 


001403 








BEQ 


TST16 






918 


003334 


012737 


000062 


000302 




MOV 


#62#3*$FATAL 


» MOVE TO MAILBOX * ******* 62 


******* 


919 


003342 


005212 








INC 


<*2> 


»SET MSGTYP TO FATAL ERROR 




920 


003344 


000000 








HALT 




1 INCORRECT STATUS ON STACK, OR WRONG 3TSTNM 


921 
















j TO SCOPE REPLACE HALT W/ 240 




922 
















j AND REPLACE NEXT INST W/ 733 




923 










1 ************************************************************************************ 


924 










1 TEST 16 


TEST THAT "NEW" 


STATUS IS CORRECT 




923 










1 ************************************************************************************ 


926 


003346 


005237 


000304 




TSTI61 


INC 


9#$TESTN 


1 UPDATE TEST NUMBER 




927 


003352 


022737 


000016 


000304 




CMP 


#16»i#8TESTN 


t SEQUENCE ERROR? 




928 


003360 


001121 








BNE 


TST17-12 


j BR TO ERROR HALT ON SEQ ERROR 




929 


003362 


012706 


000500 






MOV 


#BUFF,SP 






930 


003366 


012767 


003402 


174440 




MOV 


#PETFl, RTRAPl 






931 


003374 


005067 


174436 






CLR 


PTRAPl+2 


jCLEAR FUTURE PRIORITY AND CC 




932 


003400 


104400 








TRAP 








933 


003402 








RETFll 






> TEST FOR "C" CLEARED 




934 


003402 


100005 








BPL 


IS 






935 


003404 


012737 


000063 


000302 




MOV 


#63»9#$FATAL 


f MOVE TO MAILBOX * »«««««* 63 


******* 


936 


003412 


005212 








INC 


CR23 


jSET MSGTYP TO FATAL ERROR 




937 


003414 


000000 








HALT 




jC NOT CLEARED 




938 
















j TO SCOPE REPLACE HALT W/ 240 




939 
















f AND REPLACE NEXT INST W/ 761 




940 


003416 








1*1 










941 


003416 


001005 








BNE 


2$ 






942 


003420 


012737 


000064 


000302 




MOV 


«64»@*SFATAL 


|MOVE TO MAILBOX ******* 64 


******* 


943 


003426 


005212 








INC 


CR2) 


jSET MSGTYP TO FATAL ERROR 




944 


003430 


000000 








HALT 




jZ NOT CLEARED 




945 
















> TO SCOPE REPLACE HALT W/ 240 




946 
















f AND REPLACE NEXT INST W/ 753 




947 


003432 








28f 










948 


003432 


102005 








BVC 


3$ 






949 


003434 


012737 


000065 


000302 




MOV 


#65»»«6FATAL 


t MOVE TO MAILBOX # 65 


******* 


950 


003442 


005212 








INC 


CR2) 


I SET MSGTYP TO FATAL ERROR 




951 


003444 


000000 








HALT 




t V NOT CLEARED 




952 
















1 TO SCOPE REPLACE HALT W/ 240 




933 
















1 AND REPLACE NEXT INST W/ 745 




934 


003446 








381 










935 


003446 


103005 








BCC 


4$ 






956 


003450 


012737 


000066 


000302 




MOV 


#66#I#$FATAL 


jMOVE TO MAILBOX # #♦*###* 66 


******* 


957 


003456 


005212 








INC 


CR2) 


I SET MSGTYP TO FATAL ERROR 




958 


003460 


000000 








HALT 




iC NOT CLEARED 




939 
















% TO SCOPE REPLACE HALT W/ 240 




960 
















» AND REPLACE NEXT INST W/ 737 




961 


003462 


032767 


000340 


174306 




BIT 


#340#CC 


% TEST PRIORITY 




962 


003470 


001405 








BEQ 


5$ 






963 


003472 


012737 


000067 


000302 




MOV 


«67r?«8FATAL 


|MOVE TO MAILBOX » ##♦*«*# 67 


******* 


964 


003500 


005212 








INC 


(R2) 


f SET MSGTYP TO FATAL ERROR 




963 


003502 


000000 








HALT 




; PRIORITY NOT ZERO 




966 
















I TO SCOPE REPLACE HALT W/ 240 





'.MAIN,, MACY11 27(1006) 04-MAY-77 08113 PAGE 21 

DFKABC.PU 03-MAY-77 08|42 T16 TEST THAT "NEW STATUS IS CORRECT 



SSQ 0021 



967 
968 
969 
970 
971 
972 
973 
974 
97S 
976 
977 
978 
979 
980 
981 
982 
983 
984 
98S. 
986 
987 
988 
989 
990 
991 
992 
993 
994 
993 
996 
997 
998 
999 
1000 
1001 
3002 
1003 
1004 
1005 
1006 
1007 
1008 
1009 
1010 
1011 
1012 
1013 
1014 
101S 
1016 
1017 
1018 
1019 
1020 
1021 
1022 



003504 
003510 
003516 
003524 
003526 
003526 
003530 
003536 
003540 



003542 
003542 
003544 
003552 
003S54 



003596 
003356 
003560 
003566 
003570 



003572 
003572 
003574 
003602 
003604 



003606 
003612 
003616 
003622 
003624 
003632 
003634 



003636 
003642 
003650 
003652 
003660 
003666 
003672 
003674 
003674 
003702 
003704 



012706 
012767 
012767 
104400 

100405 
012737 
005212 
000000 



001405 
012737 
005212 
000000 



102405 
012737 
005212 
000000 



103405 
012737 
005212 
000000 



016706 
042706 
022706 
00140S 
012737 
005212 
000000 



000500 
003526 
000337 



174316 
174312 



000070 000302 



000071 000302 



000072 000302 



000073 000302 



174164 

000017 
000340 

000074 000302 



005237 000304 
022737 000017 
001011 
012767 
012767 



104400 
003706 
012706 000500 
104400 



MOV 
MOV 
MOV 
TRAP 

BMI 

MOV 
INC 
HALT 



BEQ 
MOV 
INC 
HALT 



BVS 
MOV 
INC 
HALT 



BCS 
MOV 
INC 
HALT 



MOV 
BIC 
CMP 
BEQ 
MOV 
INC 
HALT 



#BUFF,SP 

#RETGl , RTRAPl 
#357t RTRAP1+2 



1$ 

#70,S«8FATAL 
<R2) 



2$ 

#7i, n 

CR2) 



3$ 

#72f 3#8FATAL 

£R2) 



4$ 

«73r 0*8FATAL 
(R2) 



CC,SP 
#17, SP 
#340, SP 
TST17 

#74,M8FATAL 

CR2) 



I AND REPLACE NEXT INST W/ 726 



SET NEW "CC» AND PRIORITY 

TRAP HERE 



MOVE TO MAILBOX # 70 
SET MSGTYP TO FATAL ERROR 
N NOT SET 
TO SCOPE REPLACE HALT W/ 240 
AND REPLACE NEXT INST W/ 707 



MOVE TO MAILBOX # 71 
SET MSGTYP TO FATAL ERROR 
Z NOT SET 
TO SCOPE REPLACE HALT W/ 240 
AND REPLACE NEXT INST W/ 701 



MOVE TO MAILBOX • ««*«*«# 72 #**♦##* 
SET MSGTYP TO FATAL ERROR 
V NOT SET 

TO SCOPE REPLACE HALT W/ 240 

AND REPLACE NEXT INST W/ 673 



MOVE TO MAILBOX • «*»»*«« 73 *#**«»* 

SET MSGTYP TO FATAL ERROR 
C NOT SET 

TO SCOPE REPLACE HALT W/ 240 

AND REPLACE NEXT INST W/ 665 



I MOVE TO MAILBOX » *##*##» 74 #♦##*#* 
I SET MSGTYP TO FATAL ERROR 
I PRIORITY WAS CHANGED, OR WRONG STSTNM 
j TO SCOPE REPLACE HALT W/ 240 
{ AND REPLACE NEXT INST W/ 651 

I TEST 17 TEST THAT ALL COMBINATION OF "TRAP" WILL CAUSE A TRAP 



000012 
174146 



012737 

005212 
000000 



000075 000302 



TST17 S 



RCll 
RBli 
BR45I 



INC 
CMP 
BNE 
MOV 
MOV 
MOV 
TRAP 

MOV 
INC 
HALT 



S#$TESTN 

#17,3#$TESTN 
8P45 

#TRAP,RBl 

IRA1,34 

#BUFF,SP 



#75,§#SFATAL 
(R2) 



j UPDATE TEST NUMBER 
{SEQUENCE ERROR? 
! BR TO ERROR HALT ON SEQ ERROR 
INITIALIZE BASE TRAP INSTRUCTION 
j RETURN FROM TRAP TO RA1 
jSET UP STACK POINTER 

j TRAP INST WILL BE MODIFIED TO TRAP+377 

f MOVE TO MAILBOX t »»*#»♦# 75 **»*#*# 
jSET MSGTYP TO FATAL ERROR 

j PREVIOUS INST FAILED TO TRAP, OR WRONG $ TSTNM 



e MAIN B 


MACYll 


27(1006) 


04-MAY 


-77 081 


13 PAGE 22 






DFKABC, 


PI 1 03«MAY»77 


08842 




T17 TEST 


THAT ALL COMBINATION OF "TRAP" WILL CAUSE A TRAP SEQ 


1023 














} TO SCOPE REPLACE HALT W/ 240 


1024 














j AND REPLACE NEXT INST W/ 761 


1025 


003706 


005267 


177760 




RAl: INC 


RBI 


? INCREMENT TRAP INSTRUCTION 


1026 


003712 


022767 


104777 


177752 


CMP 


#104777, RBI 


J TRAP+377 TO UPPER LIMIT 


1027 


003720 


103362 






BHIS 


RCl 


I HAVE WE TESTED ALL 


1028 


003722 


012767 


000036 


174104 


MOV 


#36,34 




1029 


003730 


005067 


174102 




CLR 


36 




1030 












1031 










f TEST 20 


TEST THAT A TRAP OCCURES ON AN "IOT" INSTRUCTION 


1032 










1 ####»######*#*##########♦♦»######•#*#»«♦######»#*#♦**#*♦**#*»»######♦*♦*###*###**»**♦ 


1033 


003734 


005237 


000304 




TST20| INC 


§#$TESTN 


» UPDATE TEST NUMBER 


1034 


003740 


022737 


000020 


000304 


CMP 


#20#ei8TESTN 


j SEQUENCE ERROR? 


1033 


003746 


001006 






BNE 


TST21-12 


j BR TO ERROR HALT ON SEQ ERROR 


1036 


003750 


012706 


000500 




MOV 


#BUFF,SP 


I STACK POINTER SETUP 


1037 


003754 


012767 


003776 


174036 


MOV 


#RETA2,RTRAP2 


; RETURN LOCATION 


1038 


003762 


000004 






IOT 




{RESERVE INSTRUCTION, SHOULD TRAP 


1039 


003764 


012737 


000076 


000302 


MOV 


#76,?»8FATAL 


}MOVE TO MAILBOX # 76 


1040 


003772 


005212 






INC 


(R2) 


{SET MSGTYP TO FATAL ERROR 


1041 


003774 


000000 






HALT 




;IOT DIDN'T TRAP, OR WRONG STSTNM 


1042 














{ TO SCOPE REPLACE HALT W/ 240 


1043 














{ AND REPLACE NEXT INST W/ 764 


1044 


003776 








RETA2I 






1045 










1 ##*#####♦•###»#*#♦♦«#**«#####♦«**##**♦*»*###*#»######*####*#*#***#*♦♦*#**##*****#**♦ 


1046 










1 TEST 21 


TEST DECREMENT 


OF STACK POINTER ON A TRAP OPERATION 


1047 












1048 


003776 


00523? 


000304 




TST21 I INC 


9i8TESTN 


j UPDATE TEST NUMBER 


1049 


004002 


022737 


000021 


000304 


CMP 


#21»9#$TESTN 


> SEQUENCE ERROR? 


1050 


004Q10 


001011 






BNE 


TST22M2 


1 BR TO ERROR HALT ON SEQ ERROR 


1031 


004012 


012706 


000500 




MOV 


#BUFF,SP 


ISTACK POINTER SETUP 


1052 


004016 


012767 


004026 


173774 


MOV 


#RETB2,RTRAP2 


j RETURN POINTER 


1053 


004024 


000004 






IOT 




{RESERVED INSTRUCTION 


1054 


004026 


020627 


000474 




RETB2I CMP 


SP,#BUFF«4 


I TEST DECREMENT OF SP 


1055 


004032 


001405 






BEQ 


TST22 




1056 


004034 


012737 


000077 


000302 


MOV 


#77, M8FATAL 


{MOVE TO MAILBOX S 77 


1057 


004042 


005212 






INC 


£R2) 


{SET MSGTYP TO FATAL ERPOR 


1058 


004044 


000000 






HALT 




1 NOT DECREMENTED TWO WORDS, OR WRONG STSTNM 


1059 














{ TO SCOPE REPLACE HALT W/ 240 


1060 














j AND REPLACE NEXT TNST W/ 761 


1061 












1062 










t TEST 22 


TEST THAT PROPER P S C 9 IS SAVED 


1063 












1064 


004046 


005237 


000304 




TST22I INC 


8«8TESTN 


j UPDATE TEST NUMBER 


1065 


004052 


022737 


000022 


000304 


CMP 


#22,»*8TESTN 


{SEQUENCE ERROR? 


1066 


004060 


001012 






BNE 


T8T23»12 


{BR TO ERROR HALT ON SEQ ERROR 


1067 


004062 


012706 


000500 




MOV 


#BUFF,SP 


{STACK POINTER SETUP 


1068 


004066 


012767 


004076 


173724 


MOV 


SRETC2,PTRAP2 


{RETURN FROM TRAP POINTER 


1069 


004074 


000004 






IOT 




{TRAP ON THIS INSTRUCTION 


1070 


004076 


022767 


004076 


174370 


RETC21 CMP 


# 9 , BUFF»4 


{CHECK FOR INCREMENTED P.C e 


1071 


004104 


001405 






BEQ 


TST23 




1072 


004106 


012737 


000100 


000302 


MOV 


*100,M8FATAL 


{MOVE TO MAILBOX * #•##•#♦ 100 «♦#**## 


1073 


004114 


005212 






INC 


£R2) 


(SET MSGTYP TO FATAL ERROR 


1074 


004116 


000000 






HALT 




f INCORRECT P e C 8 ,0R WRONG STSTNM 


1075 














{ TO SCOPE REPLACE HALT W/ 240 


1076 














{ AND REPLACE NEXT INST W/ 760 


1077 










I #####««^##^###«*»###»«#'»####»#*»##'»#*##»#########«**#««###*###*##«#«##*##»##«'«'»#*'»»# 


1078 










} TEST 23 


TEST THAT "OLD 


" CC AND PRIORITY ARE PLACED ON STACK 



.MAIN. 


MACYil 


37(1006) 


04«MAY*77 08113 PAGE 


23 








DFKABC S PH 03»MAY»?7 


08142 




T22 


TEST 


THAT PROPER P.C, IS 


SAVED 


SEQ 


1079 












1080 


004120 


005237 


000304 




TST23 | 


INC 


MgTESTN 


; UPDATE TEST NUMBER 




1081 


004124 


033737 


000023 


000304 




CMP 


#23, (MgTESTN 


f SEQUENCE EPROR? 




1082 


004133 


001040 








BNE 


TST24«12 


jBR TO ERROR HALT ON SEQ ERROR 




1083 


004134 


012706 


000300 






MOV 


#BUFF,SP 


jSET Up 




1084 


004140 


012767 


004136 


173652 




MOV 


•RETD2, RTPAP2 


}SET UP 




108S 


004146 


005067 


173624 






CLR 


CC 


»CLEAR CC AND PRIORITY 




1086 


004153 


000257 








CCC 








1087 


004154 


000004 








IOT 




I TRAP 




1088 


004156 


026727 


174314 


000000 


RETD2 i 


CMP 


BUFF-2 f #0 


I TEST THAT OLD STATUS WENT TO STACK 


1089 


004164 


001405 








BEQ 


It 






1090 


004166 


012737 


000101 


000302 




MOV 


#101 r 8#$FATAL 


J MOVE TO MAILBOX * ###»#♦♦ 101 


»««»*## 


1091 


004174 


005213 








INC 


CR2) 


I SET MSGTYP TO FATAL ERROR 




1092 


004176 


000000 








HALT 




1 INCORRECT STATUS 




1093 
















1 TO SCOPE REPLACE HALT W/ 240 




1094 
















I AND REPLACE NEXT INST W/ 755 




1093 


004300 


013706 


000500 






MOV 


#BUFF,SP 


f SET UP 




1096 


004304 


012767 


004224 


173606 




MOV 


#RETE3» RTRAP3 


I SET UP 




1097 


004313 


012767 


000357 


173356 




MOV 


#357, CC 


f SET PRIORITY 




1098 


004330 


000277 








sec 




fSET CC 




1099 


004233 


000004 








IOT 




J TRAP 




1100 


004234 


026727 


174246 


000357 


RETE21 


CMP 


BUFF-2,#357 


f COMPARES STATUS ON STACK 




1101 


004333 


001405 








BEQ 


TST24 






1103 


004334 


012737 


000102 


000302 




MOV 


#102,§#SFATAL 


% MOVE TO MAILBOX # #####*» 102 


******* 


1103 


004343 


005212 








INC 


CR2) 


»SET MSGTYP TO FATAL ERROR 




1 104 


004244 


000000 








HALT 




t INCORRECT STATUS ON STACK, OR WRONG t TSTNM 


1105 
















1 TO SCOPE REPLACE HALT W/ 240 




1106 
















1 AND REPLACE NEXT INST W/ 732 




1107 












1108 










I TEST 24 


TEST THAT "NEW" 


STATUS IS CORRECT 




1109 












1110 


004346 


005237 


000304 




TST24I 


INC 


ftgTESTN 


1 UPDATE TEST NUMBER 




1111 


004233 


022737 


000024 


000304 




CMP 


#24,®«STESTN 


I SEQUENCE ERROR? 




1113 


004360 


001121 








BNE 


BR46 


? BR TO ERROR HALT ON SEQ ERROR 




1113 


004262 


012706 


000500 






MOV 


#BUFF,SP 






1114 


004266 


012767 


004302 


173334 




MOV 


#RETF2, RTRAP2 






1115 


004274 


005067 


173522 






CLR 


RTRAP2+2 


f CLEAR FUTURE PRIORITY AND CC 




1116 


004300 


000004 








IOT 








1117 


004303 








RETF2 1 






1 TEST FOR "C" CLEARED 




1118 


004302 


100005 








BPL 


1$ 






1119 


004304 


012737 


000103 


000302 




MOV 


•103,9#gFATAL 


> MOVE TO MAILBOX # 103 


******* 


1120 


004312 


005212 








INC 


(R2) 


t SET MSGTYP TO FATAL ERROR 




1131 


004314 


000000 








HALT 




?N NOT CLEARED 




1122 
















} TO SCOPE REPLACE HALT W/ 240 




1 123 
















; AND REPLACE NEXT INST W/ 761 




1124 


004316 








isi 










112S 


004316 


001005 








BNE 


2$ 






1 136 


004320 


012737 


000104 


000302 




MOV 


#104,§#§FATAL 


jMOVE TO MAILBOX if »«*«*«# 104 


«*«***« 


1127 


004336 


005212 








INC 


fP23 


i SET MSGTYP TO FATAL ERROR 




1138 


004330 


000000 








HALT 




1Z NOT CLEARED 




1129 
















I TO SCOPE REPLACE HALT W/ 240 




1130 
















1 AND REPLACE NEXT INST W/ 753 




1131 


004332 








28« 










1133 


004332 


102005 








BVC 


3$ 






1133 


004334 


012737 


00010s 


000302 




MOV 


#l05,B#gFATAL 


j MOVE TO MAILBOX • «*««»»• 105 




1134 


004342 


005212 








INC 


(R2) 


I SET MSGTYP TO FATAL ERROR 





.MAIN. 


MACYlt 


27(1006) 


04»MAY 


•77 08113 PAGE 


24 






DFKABCj 


Pll 


33»MAY«77 


08143 




T24 


TEST 


THAT "NEW" STATUS 


IS CORRECT 


1133 


004344 


000000 








HALT 




fV NOT CLEARED 


1136 
















j TO SCOPE REPLACE HALT W/ 240 


1137 
















» AND REPLACE NEXT INST W/ 745 


1138 


004346 








31 i 








1139 


004346 


103005 








BCC 


4$ 




1140 


004350 


012737 


000106 


000302 




MOV 


#106,9#gFATAL 


j MOVE TO MAILBOX t **«*»»« 1 06 


1141 


004336 


005212 








INC 


CP-2) 


I SET MSGTYP TO FATAL ERROR 


1142 


004360 


000000 








HALT 




fC NOT CLEARED 


1143 
















f TO SCOPE REPLACE HALT W/ 240 


1144 
















i AND REPLACE NEXT INST W/ 737 


1145 


004362 


032767 


000340 


173406 


4Si 


BIT 


#340, CC 


t TEST PRIORITY 


1146 


004370 


001405 








BEQ 


33 




1147 


004372 


012737 


000107 


000302 




MOV 


«107,I8#$FATAL 


t MOVE TO MAILBOX I #♦*#### 107 


1148 


004400 


005212 








INC 


(R2) 


I SET MSGTYP TO FATAL ERROR 


1149 


004402 


000000 








HALT 




^PRIORITY NOT ZERO 


1150 
















t TO SCOPE REPLACE HALT W/ 240 


1151 
















f AND REPLACE NEXT INST W/ 726 


1132 


004404 


012706 


000300 




SSI 


MOV 


#BUFF,SP 




1153 


004410 


012767 


004426 


173402 




MOV 


#RETG2, PTRAP2 




1154 


004416 


012767 


000357 


173376 




MOV 


#357,RTRAP2+2 


ISET NEW "CC" AND PRIORITY 


1155 


004424 


000004 








IOT 




f TRAP HERE 


1156 


004436 








RETG3I 








1137 


004426 


100403 








BMI 


IS 




1158 


004430 


012737 


000110 


000302 




MOV 


#11Q»S#8FATAL 


> MOVE TO MAILBOX * «**«*«* no 


1139 


004436 


005212 








INC 


CR2) 


1 SET MSGTYP TO FATAL ERROR 


1160 


004440 


000000 








HALT 




jN NOT SET 


1161 
















j TO SCOPE REPLACE HALT W/ 240 


1162 
















• AND REPLACE NEXT INST W/ 707 


1163 


004442 








1*1 








1164 


004442 


001405 








BEQ 


2$ 




1163 


004444 


013737 


000111 


000303 




MOV 


#lil,@#SFATAL 


I MOVE TO MAILBOX # ******* 111 


1166 


004452 


003313 








INC 


(R23 


jSET MSGTYP TO FATAL ERROR 


1167 


004434 


000000 








HALT 




|Z NOT SET 


1168 
















; TO SCOPE REPLACE HALT W/ 240 


1169 
















I AND REPLACE NEXT INST W/ 701 


1170 


004436 








2$l 








1171 


004436 


103405 








BV3 


3$ 




1172 


004460 


012737 


000113 


000302 




MOV 


#U2,@«$FATAL 


I MOVE TO MAILBOX # ***««»« 112 


1173 


004466 


003313 








INC 


(R2) 


jSET MSGTYP TO FATAL ERROR 


1174 


004470 


000000 








HALT 




1 V NOT SET 


1175 
















1 TO SCOPE REPLACE HALT W/ 240 


1176 
















S AND REPLACE NEXT INST W/ 673 


1177 


004472 








3*1 








1178 


004472 


103405 








BCS 


4$ 




1179 


004474 


012737 


000113 


000302 




MOV 


#113,?#SFATAL 


t MOVE TO MAILBOX # ******* 113 


1180 


004502 


005212 








INC 


(R25 


t SET MSGTYP TO FATAL ERROR 


1181 


004504 


000000 








HALT 




jC NOT SET 


1182 
















I TO SCOPE REPLACE HALT W/ 240 


1183 
















I AND REPLACE NEXT INST W/ 665 


1184 


004506 


016706 


173264 




4$t 


MOV 


CC,SP 




1185 


004512 


042706 


000017 






BIC 


#17, SP 




1186 


004S16 


022706 


000340 






CMP 


#340, SP 




1187 


004522 


001405 








BEQ 


BR46A 




1188 


004524 








BR46i 








1189 


004524 


012737 


000114 


000302 




MOV 


#U4,9iSFATAL 


jMOVE TO MAILBOX S ******* 114 


1190 


004532 


005212 








INC 


(R2) 


f SET MSGTYP TO FATAL ERROR 



SEQ 0024 



******* 



******* 



******* 



.MAIN, MACYll 27(1006) 04-MAY-77 08s 13 PAGE 25 

DFKABC.P11 03-MAY-77 08142 T24 TEST THAT "NEW" STATUS IS CORRECT SEQ 0025 





004334 


AAAAAft 






HALT 




» PRIORITY WAS CHANGED, OP WRONG 5TSTNM 


1 1 09 














t TO SCOPE REPLACE HALT W/ 240 


1 193 














t AND REPLACE NEXT TNST W/ 651 




... 
00**5 3© 


12767 


UUvl'f ( 


173254 


BR46AI MOV 


#22*20 


5 . + 2 


1 1 °3 


004544 


00S067 


173252 




CLR 


22 


jHALT 












I #»»«*««»*«*#*«#*»«*#*#**#«***«#****•#»#*»**»»*«»««»«»*#*«#«*««»«*»##*««#«•»«««*««««« 


1 1 97 










I TEST 25 


TEST THAT A TRAP OCCURS ON AN EMT INSTRUCTION 


1 198 










1 »»-»«««*«»»»»••»*«««#»»»•*#»««#«««»#»»»«*»«««**»*»*»*«**«««««««*«»#««*««»««#«»«*«#«#« 


1 199 




005* 3 7 


AAA1A4 

u u u j u ™ 




TST25I INC 


P#8TESTN 


I UPDATE TEST NUMBER 






022737 


AAAAK 


AAA 1 ft A 


CMP 


#25»®&STESTN 


j SEQUENCE ERROR? 


1201 




u U * U 11 o 






BNE 


TST26-12 


j BR TO ERROR HALT ON SEQ ERROR 




004564 


012706 


000300 




MOV 


#BUFF,SP 


j STACK POINTER SETUP 


1203 


004570 


012767 


004612 


173232 


MOV 


IRETA3 1 RTRAP3 


j RETURN LOCATION 




004576 


« AiAAA 






EMT 




I RESERVE INSTRUCTION, SHOULD TRAP 


120S 


004600 


01273? 


0001 13 


000302 


MOV 


•115,*iSFATAL 


j MOVE TO MAILBOX 8 115 












INC 


CR2) 


JSET MSGTYP TO FATAL ERROR 


1207. 


vUloiV 


UvUvUU 






HALT 




> EMT DIDN'T TRAP, OR WRONG STSTNM 
















t TO SCOPE REPLACE HALT W/ 240 


1 209 














1 AND REPLACE NEXT INST W/ 764 


1210 


00461 2 








RETA3 1 






1211 












1212 










iTEST 26 


TEST DECREMENT 


OF STACK POINTER ON A TRAP OPERATION 


1213 












1214 


... 


003237 


AAA1A4 




TST26! INC 


MlTESTN 


j UPDATE TEST NUMBER 


1213 


AAA* 4 * 


022737 






CMP 


#26# iiSTESTN 


? SEQUENCE ERROR? 


1216 










BNE 


TST27-12 


I BR TO ERROR HALT ON SEQ ERROR 


1217 


004626 


012 '06 


A A Aft A A 

000300 




MOV 


#BUFF,SP 


f STACK POINTER SETUP 


121® 


004632 


1 2767 


004642 


1731 '0 


MOV 


#RETB3f RTRAP3 


> RETURN POINTER 


1219 


004640 


3 USUUU 






EMT 




PRESERVED INSTRUCTION 








AAAA11 

000** r * 




RETB3I CMP 


SP,#BUFF»4 


J TEST DECREMENT OF SP 


1221 


004646 


nr> 1 Arm 






BEQ 


TST27 






0O46S0 




AAA « « £ 
000 116 


AAA1A) 

000 JUfi 


MOV 


*116,M8FATAL 


•MOVE TO MAILBOX 1 «**«*«# 116 *«««#«« 


1223 


004636 


005212 






INC 


CP2) 


jSET MSGTYP TO FATAL ERROR 




004660 


AAAAAA 






HALT 




f NOT DECREMENTED TWO WORDS, OR WRONG STSTNM 


1225 














| TO SCOPE REPLACE HALT W/ 240 


1226 














f AND REPLACE NEXT INST W/ 761 














1228 










1 TEST 27 


TEST THAT PROPER P S C, IS SAVED 














1230 




003237 






T5T27 8 INC 


8#$TESTN 


f UPDATE TEST NUMBER 


1231 




02273? 


AAAAJf 




CMP 


#27,®S8TESTN 


I SEQUENCE ERROR? 




00467 4 








BNE 


TST30-12 


I BR TO ERROR HALT ON SEQ ERROR 


1233 




012706 


AAAS AA 
UUU3UU 




MOV 


•BUFF,SP 


•STACK POINTER SETUP 


1234 




012767 


0047 1 2 


173120 


MOV 


#RETC3,RTPAP3 


IRTURN FROM TRAP POINTER 


1235 


0047 1 


1 04000 






EMT 




I TRAP ON THIS INSTRICTION 


1233 


004712 


02276? 


0047 1 2 


173554 


RETC3I CMP 


# 9 ,BUFF«4 


f CHECK FOR INCREMENTED P.C, 


123? 


004?20 


001405 






BEQ 


TST30 




1238 


004722 


012737 


0001 1 7 


000302 


MOV 


• ll7f M8FATAL 


{ MOVE TO MAILBOX # ###»#*# 117 


1239 


004730 


003212 






INC 


CR25 


1 SET MSGTYP TO FATAL ERROR 


1240 


004732 


000000 






HALT 




f INCORRECT P.C.,0R WRONG STSTNM 


1241 














1 TO SCOPE REPLACE HALT W/ 240 


1242 














1 AND REPLACE NEXT INST W/ 760 


1343 










} 


1244 










S TEST 30 


TEST THAT "OLD" 


CC AND PRIORITY ARE PLACED ON STACK 


124S 












1246 


004734 


005237 


000304 




TST30I INC 


i#STESTN 


I UPDATE TEST NUMBER 



.MAIN. 


MACY11 


27(1006) 


04»MAY 


-77 08S13 PAGE 


26 








DFKABC. 


Pit 03»MAY»7? 


08142 




T30 


TEST 


THAT "OLD" CC AND 


PRIORITY ARE PLACED ON STACK 


SEQ 


124? 


004740 


022737 


000030 


000304 




CMP 


#30, f#$TESTN 


(SEQUENCE ERROR? 




1248 


004746 


001040 








BNE 


TST31»12 


I BR TO ERROR HALT ON SEQ ERROR 




1249 


004730 


012706 


000500 






MOV 


#BUFF,SP 


1 SET UP 




1250 


004734 


01276? 


004772 


173046 




MOV 


iRETD3,RTRAP3 


jSET UP 




1231 


004762 


003067 


173010 






CLR 


CC 


f CLEAR CC AND PRIORITY 




1252 


004766 


00023? 








CCC 








1233 


004770 


104000 








EMT 




I TRAP 




1234 


004772 


026727 


173500 


000000 


RSTD33 


CMP 


BUFF«2»#0 


? TEST THAT OLD STATUS WENT TO STACK 


1253 


005000 


001403 








BEQ 


1$ 






1236 


003002 


012737 


000120 


000302 




MOV 


#120#®#$FATAL 


|M0VE TO MAILBOX # *«#««*» 120 




125? 


005010 


003212 








INC 


(R2> 


t SET MSGTYP TO FATAL ERROR 




1258 


003012 


000000 








HALT 




I INCORRECT STATUS 




1259 
















1 TO SCOPE REPLACE HALT W/ 240 




1260 
















I AND REPLACE NEXT INST W/ 755 




1261 


003014 


012706 


000500 




IS! 


MOV 


SBUFF,SP 


I SET UP 




1262 


005020 


012767 


005040 


173002 




MOV 


#RETE3»PTRAP3 


1 SET UP 




1263 


003026 


012767 


000357 


172742 




MOV 


f357,CC 


I SET PRIORITY 




1264 


003034 


00027? 








sec 




f SET CC 




1265 


003036 


104000 








EMT 




I TRAP 




1266 


005040 


026727 


173432 


000357 


RETE3 S 


CMP 


BUFF-2,»357 


1 COMPARES STATUS ON STACK 




1267 


005046 


001405 








BEQ 


TST31 






1268 


005030 


012737 


000121 


000302 




MOV 


•121-?*8FATAL 


I MOVE TO MAILBOX i ***«»«« 121 


»««*«*» 


1269 


003036 


005212 








INC 


(R2> 


f SET MSGTYP TO FATAL ERROR 




1270 


005060 


000000 








HALT 




J INCORRECT STATUS ON STACK, OR WRONG STSTNM 


1271 
















I TO SCOPE REPLACE HALT W/ 240 




1272 
















f AND PEPLACE NEXT INST W/ 732 




1273 












1274 










g TEST 31 


TEST THAT "NEW" 


STATUS IS CORRECT 




1275 












1276 


005062 


00323? 


000304 




TST31I 


INC 


®»$TESTN 


1 UPDATE TEST NUMBER 




127? 


003066 


022737 


000031 


000304 




CMP 


#3i,@#$TESTN 


1 SEQUENCE ERROR? 




1278 


005074 


001117 








BNE 


TST32«12 


jBR TO ERROR HALT ON SEQ ERROR 




1279 


005076 


012706 


000500 






MOV 


#BUFF,SP 






1280 


005102 


012767 


003116 


172720 




MOV 


#RETF3, RTRAP3 






1281 


003110 


00506? 


172716 






CLR 


PTRAP3+2 


} CLEAR FUTURE PRIORITY AND CC 




1282 


005114 


104000 








EMT 








1283 


003116 








RETF31 






1 TEST FOR "C" CLEARED 




1284 


005116 


100005 








BPL 


IS 






1283 


003120 


012737 


000122 


000302 




MOV 


*122,e#SFATAL 


•MOVE TO MAILBOX * **«**«« 122 




1286 


005126 


00S212 








INC 


(R2) 


1 SET MSGTYP TO FATAL ERROR 




128? 


003130 


000000 








HALT 




|C NOT CLEARED 




1288 
















I TO SCOPE REPLACE HALT W/ 240 




1289 
















f AND REPLACE NEXT INST W/ 761 




1290 


003132 








1SS 










1291 


003132 


001003 








BNE 


23 






1292 


003134 


012737 


000123 


000302 




MOV 


*123,0«$FATAL 


fMOVE TO MAILBOX S 123 




1293 


003142 


003212 








INC 


CR2) 


JSET MSGTYP TO FATAL ERROR 




1294 


003144 


000000 








HALT 




fZ NOT CLEARED 




1293 
















f TO SCOPE REPLACE HALT W/ 240 




1296 
















1 AND REPLACE NEXT INST W/ 753 




129? 


003146 








2®i 










1298 


003146 


102003 








BVC 


31 






1299 


003130 


01273? 


000124 


000302 




MOV 


#124,®WATAL 


fMOVE TO MAILBOX # «#«««•* 124 




1300 


003156 


005212 








INC 


(R2) 


I SET MSGTYP TO FATAL ERROR 




1301 


0O316O 


000000 








HALT 




IV NOT CLEARED 




1302 
















t TO SCOPE REPLACE HALT W/ 240 





'.MAIN. MACYll 37(1006) 04-MAY-77 08813 PAGE 27 

OPKABC.P11 03-MAY-77 00142 T31 TEST THAT "NEW STATUS IS CORRECT 



SEQ 0027 



1303 
















1 AND REPLACE NEXT INST W/ 745 




1304 


005163 








3*1 










1303 


005163 


103003 








BCC 


4$ 






1306 


005164 


013737 


000123 


000302 




MOV 


#133f §#$FATAL 


> MOVE TO MAILBOX * »*«««#» 125 


####### 


1307 


005172 


003313 








INC 


CR3) 


J SET MSGTYP TO FATAL ERROR 




1308 


005174 


000000 








HALT 




|C NOT CLEARED 




1309 
















t TO SCOPE REPLACE HALT W/ 240 




1310 
















1 AND REPLACE NEXT INST W/ 737 




1311 


005176 


033767 


000340 


172572 


4$i 


BIT 


#340, CC 


t TEST PRIORITY 




1313 


005304 


001403 








BEQ 


3S 






1313 


005206 


013737 


000123 


000302 




MOV 


#126,fi#SFATAL 


j MOVE TO MAILBOX * **«#«*« 136 




1314 


005314 


O0S212 








INC 


CR3) 


j SET MSGTYP TO FATAL ERROR 




1315 


003216 


000000 








HALT 




j PRIORITY NOT ZERO 




1316 
















f TO SCOPE REPLACE HALT W/ 340 




1317 
















t AND REPLACE NEXT INST W/ 736 




1318 


003320 


012706 


000300 




332 


MOV 


#BUFF,SP 






1319 


005324 


012767 


005242 


172576 




MOV 


#RETG3#RTRAP3 






1320 


. 005232 


013767 


000357 


172573 




MOV 


#357,RTRAP3+2 


I SET NEW "CC" AND PRIORITY 




1321 


005240 


104000 








EMT 




1 TRAP HERE 




1322 


005343 








RET63I 










1323 


005242 


100405 








BMI 


IS 






1324 


005344 


012737 


000127 


000303 




MOV 


#127,©#8FATAL 


iMOVE TO MAILBOX • «««#*«« 137 




132S 


005352 


003313 








INC 


CR2) 


) SET MSGTYP TO FATAL ERROR 




1326 


003254 


000000 








HALT 




|N NOT SET 




1327 
















1 TO SCOPE REPLACE HALT W/ 340 




1328 
















1 AND REPLACE NEXT INST W/ 707 




1329 


003236 








Hi 










1330 


003356 


001405 








BEQ 


n 






1331 


005360 


013737 


000130 


000303 




MOV 


#130,»#8FATAL 


fMOVE TO MAILBOX # 130 


*#**#«* 


1332 


005366 


005213 








INC 


CR23 


fSET MSGTYP TO FATAL ERROR 




1333 


005270 


000000 








HALT 




iZ NOT SET 




1334 
















I TO SCOPE REPLACE HALT W/ 240 




1335 
















f AND REPLACE NEXT INST W/ 701 




1336 


003372 








2$S 










1337 


005373 


102405 








BVS 


3$ 






1338 


003274 


013737 


000131 


000303 




MOV 


#131,?#8FATAL 


fMOVE TO MAILBOX # #*#»«## 131 




1339 


003303 


003212 








INC 


CR2) 


ISET MSGTYP TO FATAL ERROR 




1340 


005304 


000000 








HALT 




»V NOT SET 




1341 
















1 TO SCOPE REPLACE HALT W/ 240 




1342 
















1 AND REPLACE NEXT INST W/ 673 




1343 


005306 








3$i 










1344 


005306 


103405 








BCS 


4$ 






134S 


005310 


012737 


000132 


000303 




MOV 


#132,8#8FATAL 


fMOVE TO MAILBOX # 132 




1346 


003316 


003212 








INC 


CR2) 


fSET MSGTYP TO FATAL ERROR 




1347 


003320 


000000 








HALT 




}C NOT SET 




1348 
















I TO SCOPE REPLACE HALT W/ 240 




1349 
















t AND REPLACE NEXT INST W/ 665 




1330 


003332 


000257 






4$| 


CCC 








1 331 


003324 


022767 


000340 


173444 




CMP 


#340, CC 






13S2 


003333 


001405 








BEQ 


TST32 






13S3 


005334 


012737 


000133 


000302 




MOV 


#133r3#3FATAL 


I MOVE TO MAILBOX • *♦#*#*# 133 




1354 


003342 


005212 








INC 


(R2) 


} SET MSGTYP TO FATAL ERROR 




1355 


003144 


000000 








HALT 




* PRIORITY WAS CHANGED, OR WRONG 8TSTNM 


1336 
















f TO SCOPE REPLACE MALT W/ 240 




1357 
















1 AND REPLACE NEXT INST W/ 653 




1358 










1 ##&############&######»###^##############^ 



.MAIN, 


MACYll 


27(1006) 




•77 08 


113 PAGE 28 






DFKABC 


Pll 03»MAY«77 


08142 




T3t TEST 


THAT »NEW" STATUS 


IS CORRECT SEQ 


1359 










f TEST 32 


TEST THAT ALL 


COMBINATION OF EMT WILL CAUSE A TRAP 


1360 












1361 


005346 


005237 


000304 




TST32I INC 


9#$TESTN 


t UPDATE TEST NUMBER 


1362 


003352 


022737 


000032 


000304 


CMP 


#32»&#$TESTN 


t SEQUENCE ERROR? 


1363 


005360 


001011 






BNE 


BR47 


?BP. TO ERROR HALT ON SEQ ERROR 


1364 


005362 


012767 


104000 


O00012 


MOV 


#EMT,R8 


; INITIALIZE BASE EMT INSTRUCTION 


1363 


0053^0 


012767 


005416 


172432 


MOV 


IRA, 30 


f RETURN FROM TRAP TO RA 


1366 


005376 


012706 


000300 




RCl MOV 


IBUFF,SP 


|SET Up STACK POINTER 


1367 


005402 


104000 






RB| EMT 




1 TRAP INST, WILL- BE MODIFIED TO EMT+377 


1368 


003404 








BR471 






1369 


003404 


012737 


000134 


000302 


MOV 


*134,9»$FATAL 


I MOVE TO MAILBOX « ####### 134 **#*##» 


1370 


005412 


005212 






INC 


(R2) 


I SET MSGTYP TO FATAL ERROR 


1371 


005414 


000000 






HALT 




1 PREVIOUS INST FAILED TO TRAP, OR WRONG J TSTNM 


1372 














1 TO SCOpE REPLACE HALT W/ 240 


1373 














f AND REPLACE NEXT INST W/ 761 


1374 


003416 


005267 


177760 




RAt INC 


RB 


; INCREMENT TRAP INSTRUCTION 


1373 


005422 


022767 


104377 


177752 


CMP 


#104377, RB 


; EMT+377 TO EMT? 


1376 


003430 


103363 






BHIS 


RC 


I HAVE WE TESTED ALL 


1377 














lYES 


1378 


003432 


013767 


000032 


173370 


MOV 


032,30 


f/„ + 


1379 


003440 


005067 


172366 




CLR 


32 


1 HALT 


1380 












1381 










I TEST 33 


TEST THAT A TRAP OCCURES ON AN "TRACE-TRT" INSTRUCTION 


1382 










i 


1383 


005444 


003237 


000304 




TST33I INC 


l#$TESTN 


j UPDATE TEST NUMBER 


1384 


005450 


033737 


000033 


000304 


CMP 


#33,I#$TESTN 


{SEQUENCE ERROR? 


1383 


005436 


001006 






BNE 


TST34-12 


I BR TO ERROR HALT ON SEQ ERROR 


1386 


005460 


013706 


000300 




MOV 


#8UFF, sP 


I STACK POINTER SETUP 


1387 


005464 


013767 


003306 


173333 


MOV 


♦RETA4, RTRAP4 


f RETURN LOCATION 


1388 


003472 


000003 






TRT 




1 RESERVED INSTRUCTION, SHOULD TRAP 


1389 


005474 


013737 


000135 


OOO3O2 


MOV 


«135,8#8FATAL 


1 MOVE TO MAILBOX » *«#«*«* 135 «*««««# 


1390 


005502 


005313 






INC 


CR2) 


t SET MSGTYP TO FATAL ERROR 


1391 


005504 


000000 






HALT 




t TRT DIDN'T TRAP, OR WRONG 8TSTNM 


1392 














I TO SCOPE REPLACE HALT W/ 240 


1393 














1 AND REPLACE NEXT INST W/ 764 


1394 


005506 








RETA4I 






1395 












1396 










1 TEST 34 


TEST DECREMENT 


OF STACK POINTER ON A TRAP OPERATION 


1397 












1398 


005506 


005237 


000304 




TST34I INC 


9«$TESTN 


> UPDATE TEST NUMBER 


1399 


005512 


022737 


000034 


000304 


CMP 


#34,@#$TESTN 


> SEQUENCE ERROR? 


1400 


005520 


001011 






BNE 


TST35-12 


1 BR TO ERROR HALT ON SEQ ERROR 


1401 


005522 


012706 


000500 




MOV 


#BUFF,SP 


I STACK POINTER SETUP 


1402 


005526 


012767 


005336 


172360 


MOV 


#RETB4, RTRAP4 


1 RETURN POINTER 


1403 


005534 


000003 






TRT 




1 RESERVED INSTRUCTION 


1404 


005536 


020627 


000474 




RETB4I CMP 


SP,#BUFF»4 


1 TEST DECREMENT OF SP 


1405 


005542 


001403 






BEQ 


TST35 




1406 


005544 


012737 


000136 


000303 


MOV 


#136,9#8FATAL 


1 MOVE TO MAILBOX # •*«*««* 136 «*««««* 


1407 


005552 


003212 






INC 


CR2) 


ISET MSGTYP TO FATAL ERROR 


1408 


005554 


000000 






HALT 




I NOT DECREMENTED TWO WORDS, OR WRONG 8TSTNM 


1409 














1 TO SCOPE REPLACE HALT W/ 240 


1410 














1 AND REPLACE NEXT INST W/ 761 


1411 












1412 










1 TEST 33 


TEST THAT PROPER P.C. IS SAVED 


1413 












1414 


003356 


00S237 


000304 




TST3S8 INC 


3SSTESTN 


1 UPDATE TEST NUMBER 



.MAIN. MACY11 27(1006) 04-MAY-77 08f 13 PAGE 29 

DFKABC.PU 03-MAY-77 08|42 T3S TEST THAT PPOPER P.C, IS SAVED 



SEQ 002@ 



1415 


003562 


022737 


000035 


000304 


CMP 


#35, 9#0TE5TN 


j SEQUENCE ERROR? 


1416 


003370 


001012 






BNE 


TST36«»12 


jBR TO ERROR HALT ON SEQ ERROR 


1417 


003572 


012706 


000300 




MOV 


#BUFF, SP 


> STACK POINTER SETUP 


1418 


003376 


01 276? 


003606 


172210 


MOV 


#RETC4, RTRAP4 


; RETURN FROM TRAP POINTER 


1419 


005604 


000003 






TRT 




J TRAP ON THIS INSTRUCTION 


1420 


v U3 w wO 


02276? 


005606 


172660 


RETC4| CMP 


#.,BUFF»4 


;CHECK FOR INCREMENTED P.C, 


1421 


003614 


00140S 






BEQ 


TST36 




1 423 




012737 


000 1 37 


000302 


MOV 


#137,MSFATAL 


jMOVE TO MAILBOX * ******* 137 ******* 


1423 


003624 


005212 






INC 


(R2) 


% SET MSGTYP TO FATAL ERROR 


1424 


vuio*o 


000000 






HALT 




j INCORRECT P.C,, OR WRONG STSTNM 


1 42S 














» TO SCOPE REPLACE HALT W/ 240 


1426 














1 AND REPLACE NEXT INST W/ 760 


1427 










1 ***««»*«*********#*«*•»*««*«**«****«»««**«*«*«*«**«*«**«•*****«»***««******«*««*«*«* 


1 428 










f TEST 36 


TEST THAT "OLD" 


CC AND PRIORITY ARE PLACED ON STACK 


1429 










1 a*********************************************************************************** 


1430 


003630 


003237 


000304 




TSTUft 1 IMP 




j UPDATE TEST NUMBER 


1431 


003634 


022737 


000036 


000304 


CMP 


11c, age Tire tm 




1412 


003642 


001040 






BNE 


TST37" 1 2 


•BR TO ERROR HALT ON SEQ ERROR 


1433 


003644 


012706 


000500 




MOV 


8 RUFF . SD 

9 our r , Or 


j SET UP 


1434 


003630 


01276? 


00S666 


172136 


MOV 


#PETD4, RTRAP4 


j SET UP 


1435 


003656 


00306? 


1721 14 




CLR 


CC 


fCLEAR CC AND PRIORITY 


1436 


005662 


00023? 






CCC 






1437 


003664 


000003 






TRT 




i TRAP 


1438 


005666 


026727 


172604 


000000 


RETD4 I CMP 


BUFF™2,#0 


TTEST THAT OLD STATUS WENT TO STACK 


1439 














1 TEST FOR ALL ZEROS 


1440 


nn3A74 

Ui/y w t ^ 


001403 






BEQ 


IS 




1441 


005576 


012737 


000140 


000302 


MOV 


#140,8#SFATAL 


t MOVE TO MAILBOX # ******* 140 ******* 


1442 


003704 


003212 






INC 


(R23 


1 SET MSGTYP TO FATAL ERROR 


1443 


UUv f Uw 


000000 






HALT 




? INCORRECT STATUS 


1 444 














> TO SCOPE REPLACE HALT VM 240 


1 44S 














f AND REPLACE NEXT INST W/ 755 


1446 


0057 10 


012706 


000300 




181 MOV 


#BUFF,SP 


J SET UP 


1447 


003? 1 4 


012767 


003734 


172072 


MOV 


#RETE4, RTPAP4 


j SET UP 


1448 


003722 


012767 


000337 


172Q46 


MOV 


#357, CC 


jSET PRIORITY 


1449 


005730 


000277 






sec 




j SET-SET CC 


1450 


005732 


000003 






TRT 




1 TRAP 


J 431 


005734 


026727 


172336 


000337 


RETE4 | CMP 


BUFF-2, #357 


j COMPARES STATUS ON STACK 


1432 


005742 


001405 






BEQ 


TST37 




1453 


003744 


012737 


000141 


000302 


MOV 


#141* ilSFATAL 


jMOVE TO MAILBOX # ******* 141 ******* 


1434 




003212 






INC 


CR23 


jSET MSGTYP TO FATAL ERROR 


1433 


0Q5754 


000000 






HALT 




j INCORRECT STATUS ON STACK, OR WRONG $TSTNM 


1436 














j TO SCOPE REPLACE HALT W/ 240 


1437 














j AND REPLACE NEXT INST W/ 732 


1438 










1 »•*****»*«***««**#«**««******«*«**«*»**#***«******«««*«««***#*****«*»**«*****««***** 


1439 










iTEST 37 


TEST THAT "NEW" 


STATUS IS CORRECT 


1460 










I *«*«*«***********•*********»***«*#«**«*«*«**»***#*•»«*#»«**»»**«*««***««*«««*******« 


1461 


005756 


003237 


000304 




TST37 1 INC 


i#$TESTN 


I UPDATE TEST NUMBER 


1462 


003762 


022737 


000037 


000304 


CMP 


#37,®#$TESTN 


1 SEQUENCE ERROR? 


1463 


005770 


001121 






BNE 


BR51 


j BR TO ERROR HALT ON SEQ ERROR 


1464 


003772 


012706 


000500 




MOV 


#BUFF,SP 




1463 


005776 


012767 


006012 


172010 


MOV 


#RETF4, RTPAP4 




1466 


006004 


003067 


172006 




CLR 


RTRAP4+2 


j CLEAR FUTURE PRIORITY AND CC 


1467 


006010 


000003 






TRT 






1468 


006012 








RETF4I 




; TEST FOR "C» CLEARED 


1469 


006012 


10000S 






BPL 


11 




1470 


006014 


012737 


000142 


000302 


MOV 


#142, 3#SFATAL 


1 MOVE TO MAILBOX « ******* 1 42 ******* 



.MAIN. 


MACY11 


27(1006) 


DFKABC 


Pll 


33»MAY»77 


1471 


006022 


005212 


1472 


006024 


000000 


1473 






1474 






1475 


006026 




1476 


006026 


001003 


1477 


006030 


012737 


1478 


006036 


003212 


1479 


006040 


000000 


1480 






1481 






1482 


006Q42 




1483 


006042 


102005 


1484 


006044 


012737 


1485 


006o32 


005212 


1486 


006054 


000000 


1487 






1488 






1489 


006056 




1490 


006056 


103005 


1491 


006060 


012737 


1492 


006066 


005212 


1493 


006070 


000000 


1494 






1495 






1496 


0060?2 


032767 


1497 


006100 


001405 


1498 


006102 


012737 


1499 


006UO 


003212 


1500 


006112 


000000 


1501 






1303 






1503 


006114 


012706 


!S04 


006120 


01276? 


1303 


006126 


012767 


1306 


006134 


000003 


130? 


006136 




1308 


006136 


100405 


1309 


006140 


012737 


1510 


006146 


005212 


1511 


006150 


000000 


1512 






1313 






1514 


006152 




1515 


006152 


001405 


1516 


006154 


012737 


151? 


006162 


005212 


1313 


006164 


000000 


1519 






1520 






1521 


006166 




1522 


006166 


102405 


1323 


006170 


012737 


1324 


006176 


005212 


1525 


006200 


000000 


1526 







04-MAY-77 08113 PAGE 30 



T37 



TEST THAT »NEW« STATUS IS CORRECT 



000143 000302 



000144 000302 



000145 000302 



21! 



000340 
000146 



000500 
006136 
000357 



171676 4$: 
000302 



171666 
171662 



PETG4 I 



000147 000302 



000150 000302 



000151 000302 



INC 
HALT 



BNE 
MOV 
INC 
HALT 



BVC 
MOV 
INC 
HALT 



BCC 
MOV 
INC 
HALT 



BIT 
BEQ 
MOV 
INC 
HALT 



MOV 

MOV 
MOV 
TRT 

BMI 

MOV 
INC 
HALT 



BEQ 
MOV 
INC 
HALT 



BVS 
MOV 
INC 
HALT 



(R2) 



2$ 

#M3,B#8FATAL 
(R2) 



38 

•144,e#$FATAL 

(R25 



48 

#145,9«8FATAL 
(R2) 



#340, CC 

58 

#146,i#SFATAL 
(R2) 



#BUFF,SP 
#RETG4, RTRAP4 
#357,RTRAP4+2 



18 

#147,©#SFATAL 
CR2) 



28 

#150,9»SFATAL 

(R2) 



38 

#151,@#8FATAL 
(R2) 



I SET MSGTYP TO FATAL ERROR 
|C NOT CLEARED 

j TO SCOPE REPLACE HALT W/ 240 
f AND REPLACE NEXT INST W/ 761 



; MOVE TO MAILBOX # ******* 143 ******* 

jSET MSGTYP TO FATAL ERROR 
|Z NOT CLEARED 

| TO SCOPE REPLACE HALT W/ 240 
f AND REPLACE NEXT INST W/ 753 



;MOVE TO MAILBOX t ******* 144 ******* 
JSET MSGTYP TO FATAL ERROR 
|V NOT CLEARED 

I TO SCOPE REPLACE HALT W/ 240 
t AND REPLACE NEXT INST W/ 745 



j MOVE TO MAILBOX # ******* 145 ******* 
>SET MSGTYP TO FATAL ERROR 
tC NOT CLEARED 

I TO SCOPE REPLACE HALT W/ 240 
I AND REPLACE NEXT INST W/ 737 
j TEST PRIORITY 



jMOVE TO MAILBOX # **««*»* 
1 SET MSGTYP TO FATAL ERROR 
^PRIORITY NOT ZERO 
f TO SCOPE REPLACE HALT W/ 240 
; AND REPLACE NEXT INST W/ 726 



jSET NEW "CC AND PRIORITY 
I TRAP HERE 



jMOVE TO MAILBOX * «*«**«« 14 
I SET MSGTYP TO FATAL ERROR 
|N NOT SET 

f TO SCOPE REPLACE HALT W/ 240 
1 AND REPLACE NEXT INST W/ 707 



146 



******* 



jMOVE TO MAILBOX # ******* 
f SET MSGTYP TO FATAL ERROR 
|Z NOT SET 

j TO SCOPE REPLACE HALT W/ 240 
I AND REPLACE NEXT INST W/ 701 



jMOVE TO MAILBOX # «****«« 15 
I SET MSGTYP TO FATAL ERROR 
jV NOT SET 

j TO SCOPE REPLACE HALT W/ 240 



150 ******* 



******* 



.MAIH. MACY11 27(1006) 04-MAY-77 08113 PAGE 31 

DFKABC , PI 1 03-MAY-77 08|42 T37 TEST THAT "NEW" STATUS IS CORRECT 



1527 








1528 


006202 






1529 


006202 


1 03405 




1530 


006204 


012737 


000152 


1531 


006212 


005212 




1532 


00621 4 


000000 




1533 








1534 












a 4 &1 a£ 
019/08 


171554 


« «*& 


006222 


nAtl A& 

0*2 / Oo 


A A A A 4 "l 

00001 7 


1537 


006226 


A A A^ A A 

022 /Oo 


A A A % A A 

000 3*0 


1538 


006232 


001 405 




1539 


006234 






1540 


006234 


012737 


000153 


1541 


006242 


005212 




1542 


006244 


000000 




1543 








1544 


006246 






1545 


012767 


000016 


1546 


006254 


005067 


171536 


1547 








1548 








1549 








1550 








1551 








1552 








1553 








1554 








1555 








1556 








1557 


006260 


005237 


000304 


1 558 


006264 


0227 37 


A A A A & A 


1559 


006272 


001006 




1560 


006274 


012706 


000500 


1561 


006300 




006322 


1562 


006306 


AAA « A A 

000100 




1563 


006310 


012737 


A A A 4 & A 
000154 


1564 


00631 6 


005212 




1565 


006320 


000000 




1566 








*i!f 1 








1568 


006322 






1569 








1570 








1571 








1572 


006322 


005237 


000304 


1573 


006326 


022737 


000041 


1574 


006334 


00101 1 




1575 


006 336 


012706 


A A A ft A A 


1576 


006342 


012767 


006352 


1577 


006350 


000100 




1578 


006352 


020627 


000474 


1579 


006356 


001405 




1580 


006360 


012737 


000155 


1581 


006366 


005212 




1582 


006370 


000000 





171540 BR51AI 



000304 

171476 
000302 



000304 
171434 

000302 



BCS 
MOV 
INC 
HALT 



MOV 
BIC 
CMP 
BEQ 

MOV 
INC 
HALT 



MOV 
CLR 



4$ 

#152r9«IFATAL 

(R2) 



CC,SP 
#17, 5P 
#340, SP 
BR51A 



#153, 
CR2) 



#16,14 
16 



! AND REPLACE NEXT INST W/ 673 



t MOVE TO MAILBOX i »*«***« 15 
I SET MSGTYP TO FATAL ERROR 
|C NOT SET 

I TO SCOPE REPLACE HALT W/ 240 
I AND REPLACE NEXT INST W/ 665 



I MOVE TO MAILBOX 9 153 ft«»*«*« 

I SET MSGTYP TO FATAL ERROR 

I PRIORITY WAS CHANGED, OP WRONG STSTNM 

j TO SCOPE REPLACE HALT W/ 240 

I AND REPLACE NEXT INST W/ 651 



I PDP-11 ILLEGAL AND ADDRESS INSTRUCTION TEST 

f ALL INSTRUCTIONS THAT ARE RESERVED 

I SHOULD TRAP TO LOCATION 4, AND THE 

I PC THAT POINTS TO THE TRAPPING INSTRUCTION 

I SHOULD BE PLACED ON THE STACK 

1 

I TEST 40 TEST THAT A TRAP OCCURS ON AN ILLEGAL INSTRUCTION 



INC 
CMP 
BNE 
MOV 
MOV 
JMP 
MOV 
INC 
HALT 



9#$TESTN 
#40,3#3TESTN 
TST41-12 
#BUFF,SP 
9RETA5 , RTPAP5 
%0 

il54,9«SFATAL 

(R23 



TST40I INC 9#$TESTN | UPDATE TEST NUMBER 

1 SEQUENCE ERROR? 
f BR TO ERROR HALT ON SEQ ERROR 
fSTACK POINTER SETUP 
IRETURN LOCATION 

; ILLEGAL INSTRUCTION, SHOULD TRAP 
I MOVE TO MAILBOX 9 ######* 154 
J SET MSGTYP TO FATAL ERROR 

I ILLEGAL INSTRUCTION DIDN'T TRAP, OP WRONG 8TSTNM 
t TO SCOPE REPLACE HALT W/ 240 
J AND REPLACE NEXT INST W/ 764 

RETA5 1 

I ****##«***««»«**«**««««**#«««#«»#««»«#««»«»«**«*»««««***«**#**«*«««*#**«#«»**«•«««*# 

I TEST 41 TEST DECREMENT OF STACK POINTER ON A TRAP OPERATION 

TST41 1 INC 8 # J TESTN ; UPDATE TEST NUMBER 

CMP *41,9«$TESTN ; SEQUENCE ERROR? 

BNE TST42-12 j BR TO ERROR HALT ON SEQ ERROR 

MOV #BUFF,SP J STACK POINTER SETUP 

MOV 9 RETB5 , RTRAP5 1 RETURN POINTER 

JMP %o 1 RESERVED INSTRUCTION 

RETB5 { CMP SP,#BUFF«4 f TEST DECREMENT OF SP 

BEQ TST42 

MOV #155,@«$FATAL 1 MOVE TO MAILBOX I «*«*«#« 155 ***###* 

INC (P2) jSET MSGTYP TO FATAL ERROR 

HALT t NOT DECREMENTED TWO WORDS, OR WRONG $TSTNM 



.MAIN, 


MACY11 


27(1006) 


04-MAY 


»77 08113 PAGE 32 






DFKABC, 


,P11 03«*MAY»77 


08142 




T41 TEST 


DECREMENT OF STACK 


POINTER ON A TRAP OPERATION SEQ 


1583 














I TO SCOPE REPLACE HALT W/ 240 


1584 














J AND REPLACE NEXT INST W/ 761 


1585 










1 »«*«#«•«»#»»«»**«#»#»**««««*##*»««««»**»*##««*»»»#«»«««#««*««#«*#*«**»»#««»«*«»«*««* 


1586 










1 TEST 42 


TEST THAT PROPER P,C 9 IS SAVED 


1587 












1588 


006372 


005237 


000304 




TST42I INC 


MSTESTN 


I UPDATE TEST NUMBER 


1589 


006376 


022737 


000042 


000304 


CMP 


#42,@#STESTN 


} SEQUENCE ERROR? 


1590 


006404 


001012 






BNE 


TST43-12 


t BR TO ERROR HALT ON SEQ ERROR 


1591 


006406 


012706 


000500 




MOV 


#BUFF,SP 


I STACK POINTER SETUP 


1592 


006412 


012767 


006422 


171364 


MOV 


#PETC5,RTRAP5 


j RETURN FROM TRAP POINTER 


1593 


006420 


000100 






JMp 


%0 


t TRAp ON THIS INSTRUCTION 


1594 


006422 


022767 


006422 


172044 


RETC5I CMP 


#„,BUFF»4 


jCHECK FOR INCREMENTED P,C. 


1595 


006430 


001405 






BEQ 


TST43 




1596 


006432 


012737 


000156 


000302 


MOV 


*156,*#SFATAL 


jMOVE TO MAILBOX 9 156 


1597 


006440 


005212 






INC 


(R2) 


I SET MSGTYP TO FATAL ERROR 


1598 


006442 


000000 






HALT 




1 INCORRECT P.C.,OR WRONG 8TSTNM 


1599 














t TO SCOPE REPLACE HALT W/ 240 


1600 














f AND REPLACE NEXT INST W/ 760 


1601 










1 «»*»«**«*»#«»***«*«««#*««•««««»*#»««*#*«*•***«««*##»*«««*#»«»**««##«««*«««*****««##« 


1602 










1 TEST 43 


TEST THAT "OLD" 


CC AND PRIORITY ARE PLACED ON STACK 


1603 










1 #*«**«««*««««»»*«««**»*#»#««#«»##*«*»*»****«««»#«#*«*#*««#**«**««#■»*«#«»*«#«#««**#«# 


1604 


006444 


005237 


000304 




TST43 1 INC 


?#STESTN 


1 UPDATE TEST NUMBER 


1605 


006450 


022737 


000043 


000304 


CMp 


#43*3#3TESTN 


I SEQUENCE ERROR? 


1606 


006456 


001040 






BNE 


TST44-12 


j BR TO ERROR HALT ON SEQ ERROR 


1607 


006460 


012706 


000500 




MOV 


#BUFF,SP 


1 SET UP 


1608 


006464 


012767 


006502 


171312 


MOV 


#RETD5 , RTPAP5 


f SET UP 


1609 


006472 


005067 


171300 




CLR 


CC 


{CLEAR CC AND PRIORITY 


1610 


006476 


000257 






CCC 






1611 


006500 


000100 






JMP 


%0 


I TRAP 


1612 


006502 


026727 


171770 


000000 


RETDSl CMP 


BUFF*2,#0 


1 TEST THAT OLD STATUS WENT TO STACK 


1613 


006510 


001405 






BEQ 


IS 




1614 


006512 


012737 


000157 


000302 


MOV 


«157,M$FATAL 


f MOVE TO MAILBOX * »*««««« 157 «»«»««« 


1615 


006520 


005212 






INC 


(R2) 


? SET MSGTYP TO FATAL ERROR 


1616 


006522 


000000 






HALT 




; INCORRECT STATUS 


1617 














f TO SCOPE REPLACE HALT W/ 240 


1618 














I AND REPLACE NEXT INST W/ 755 


1619 


006524 


012706 


000500 




ill MOV 


#BUFF,5P 


i SET UP 


1620 


006530 


012767 


006550 


171246 


MOV 


9RETE5, RTPAP5 


j SET UP 


1621 


006536 


012767 


000357 


171232 


MOV 


#357, CC 


j SET PRIORITY 


1622 


006544 


000277 






see 




JSET CC 


1623 


006546 


000100 






JMP 


%0 


j TRAP 


1624 


006550 


026727 


171722 


000357 


RETESi CMP 


BUFF-2, «357 


» COMPARES STATUS ON STACK 


1625 


006556 


001405 






BEQ 


TST44 




1626 


006560 


012737 


000160 


000302 


MOV 


8160,S9$FATAL 


1 MOVE TO MAILBOX # *»#**«« 160 ##**#*# 


1627 


006566 


005212 






INC 


(R2) 


1 SET MSGTYP TO FATAL ERROR 


16?8 


006570 


000000 






HALT 




j INCORRECT STATUS ON STACK, OR WRONG STSTNM 


1629 














1 TO SCOPE REPLACE HALT W/ 240 


1630 














} AND REPLACE NEXT INST W/ 73? 


1631 












1632 










I TEST 44 


TEST THAT "NEW" 


STATUS IS CORRECT 


1633 










1 »*»#*»#»***««###«•»«««#«#»*««#«#«*«««*«#*#«« 


1634 


006572 


005237 


000304 




TST44 J INC 


M8TESTN 


I UPDATE TEST NUMBER 


1635 


006576 


022737 


000044 


000304 


CMP 


#44,&#8TESTN 


I SEQUENCE ERROR? 


1636 


006604 


001117 






BNE 


TST45-12 


jBR TO ERROR HALT ON SEQ ERROR 


1637 


006606 


012706 


000500 




MOV 


#BUFF,SP 




1638 


006612 


012767 


006626 


171164 


MOV 


9RETF5, RTRAP5 





.MAIN. MACY11 27 C 10083 04-KAY-77 0SI13 PAG 
DfKABC.Pll 03-MAY-77 0Sl42 T44 



TEST THAT "NEW* STATUS IS CORRECT 



SEQ 0033 



1639 
1640 
1641 
1642 
1343 
1644 
1643 
1646 
1647 
164S 
1649 
*6S0 
1651 
16S2 
1633 
1654 
1633 
1656 
1657 
1638 
1639 
1660 
1661 
1662 
1663 
1664 
1663 
1666 
1667 
1668 
1669 
1670 
1671 
1672 
1673 
1674 
1675 
1676 
1677 
1678 
1679 
1680 
1681 
1682 
1683 
1684 
168S 
1686 
1687 
1688 
1689 
1690 
1691 
1692 
1693 
1694 



006620 
006624 
006626 

006626 
006630 
006636 

006640 



006642 
006642 



006652 

" 14 



006636 
006656 
006660 

006666 
006670 



006672 

006672 
006$74 
006702 
006704 



006706 
006714 
006716 
006724 
006726 



008730 
006734 
006742 
006730 
006752 
006752 
006754 
006762 
006764 



006766 
006766 
006770 
006776 
007000 



007002 



005067 

000100 

100005 
012737 

005212 
000000 



001003 
012737 
005212 

000000 



102005 
012737 
005212 



103003 
012737 
005212 

000000 



032767 

001405 
012737 
003212 
000000 



012706 
012767 
012767 

000100 

100403 
012737 
005212 
000000 



001405 
012737 
005212 
000000 



171162 



000161 000302 



000162 000302 



000163 000302 



000164 000302 



000357 171062 48t 
000165 000302 



000500 311 
006752 171042 
000357 171036 



000166 000302 



000167 000302 



CLR 


RTRAP5*2 


f CLEAR FUTURE PRIORITY AND 


cc 


JMP 


%0 










j TEST FOR "C B CLEARED 




BPL 


IS 






MOV 


#161 * 998FATAL 


j MOVE TO MAILBOX # 


t 161 


INC 


(R2 3 


1 SET MSGTYP TO FATAL ERROR 




HALT 




|C NOT CLEARED 








i TO SCOPE REPLACE HALT W/ 


240 






$ AND REPLACE NEXT INST W/ 


761 


SHE 


2$ 






MOV 


# 162» §# 8FATAL 


1 MOVE TO MAILBOX 8 ######4 




INC 


(R2) 


1 SET MSGTYP TO FATAL ERROR 




HALT 




fZ NOT CLEARED 








I TO SCOPE REPLACE HALT W/ 


240 






1 AND REPLACE NEXT INST W/ 


753 


BVC 


3$ 






MOV 


#163»®#8FATAL 


} MOVE TO MAILBOX # #####<M 


> 163 


INC 


CR23 


fSET MSGTYP TO FATAL ERROR 




HALT 




fV NOT CLEARED 








% TO SCOPE REPLACE HALT W/ 


240 






f AND REPLACE NEXT INST W/ 


745 


BCC 


4$ 






MOV 


# 164# @#$FATAL 


;MOVE TO MAILBOX # 


» 164 


INC 


(R2) 


{SET MSGTYP TO FATAL ERROR 




HALT 




|C NOT CLEARED 








> TO SCOPE REPLACE HALT W/ 


240 






f AND REPLACE NEXT INST W/ 


737 


BIT 


#357»CC 


I TEST PRIORITY 




BEQ 


5$ 






MOV 


#165,8#$FATAL 


I MOVE TO MAILBOX # 


* 165 


INC 


CR23 


f SET MSGTYP TO FATAL ERROR 




HALT 




j PRIORITY NOT ZERO 








I TO SCOPE REPLACE HALT W/ 


240 






1 AND REPLACE NEXT INST W/ 


726 


MOV 


#BUFF#SP 






MOV 


#RETG5,RTRAP5 






MOV 


#357,RTRAP5+2 


I SET NEW «CC« AND PRIORITY 




JMP 


%o 


1 TRAP HERE 




BMI 


13 






MOV 


1 166 f 9#$FATAL 


I MOVE TO MAILBOX * »•#*«*< 


i 166 


INC 


CR23 


j SET MSGTYP TO FATAL ERROR 




HALT 




jN NOT SET 








I TO SCOPE REPLACE HALT W/ 


240 






I AND REPLACE NEXT INST W/ 


707 


BEQ 


2$ 






MOV 


*167,$iSFATAL 


f MOVE TO MAILBOX • ######< 


* 167 


INC 


CR23 


I SET MSGTYP TO FATAL ERROR 




HALT 




|Z NOT SET 





TO SCOPE REPLACE HALT W/ 240 
AND REPLACE NEXT INST W/ 701 



.MAIN. MACYll 27(10063 04-MAY-77 
DFKABC.P11 03-MAY-77 08f42 



08S13 PAG 

T44 



34 

TEST THAT "NEW« 



STATUS IS CORRECT 



693 
696 
697 
698 
699 
700 
701 
702 
703 
704 
705 
706 
707 
708 
709 
710 
711 
712 
713 
714 
713 
716 
717 
718 
719 
720 

;» 

723 

?a 

726 

727 
728 
729 
730 
731 
732 
733 
734 
733 
736 
737 
73! 
739 
740 
741 
742 
743 
744 
745 
746 
747 
748 
749 
750 



007002 102405 

007004 012737 000170 000302 

007012 005212 

007014 000000 



007018 

007016 103405 

007020 012737 000171 000302 

007026 005212 

007030 000000 



007032 016706 170740 

007036 022706 000357 

007042 001403 

007044 012737 000172 000302 

007052 005212 

007054 000000 



007056 


00S237 


000304 




007062 


022737 


000045 


000304 


007070 


001006 






007072 


012706 


000500 




007076 


012767 


007120 


170700 


007104 


004000 
012737 






007106 


000173 


000302 


007114 


005212 






007116 


000000 







007120 



007120 
007124 
007132 
007134 

007140 
007146 
007130 
007154 
00706 
007164 
007166 



005237 000304 

022737 000046 000304 

001011 

012706 000500 

012767 007150 170636 

004000 

020627 000474 
001403 

012737 000174 000302 

005212 

000000 



BVS 3« 

MOV *170,*#8FATAL |MOVE TO MAILBOX • ####*## 170 

INC CR23 ISET MSGTYP TO FATAL ERROR 

HALT |V NOT SET 

I TO SCOPE REPLACE HALT W/ 240 
t AND REPLACE NEXT INST W/ 673 

381 

BCS 41 

MOV *171#»*tFATAL f MOVE TO MAILBOX « ######* 171 

INC (R23 I SET MSGTYP TO FATAL ERROR 

HALT fC NOT SET 

I TO SCOPE REPLACE HALT W/ 240 
t AND REPLACE NEXT INST W/ 665 

411 MOV CC,SP 

CMP #337, SP 

BEQ TST4S 

MOV #172#M8FATAL f MOVE TO MAILBOX # «*«*«•« 172 

IRC (R23 * SET MSGTYP TO FATAL ERROR 

HALT {PRIORITY WAS CHANGED, OR WRONG 8TSTNM 

f TO SCOPE REPLACE HALT W/ 240 
t AND REPLACE NEXT INST W/ 653 

I TEST 45 TEST THAT A TRAP OCCURES ON ALL ILLEGAL INSTRUCION 

TST4SI INC ®#$TESTN | UPDATE TEST NUMBER 

CMP #45»M$TESTN f SEQUENCE ERROR? 

BNE TST46-12 I BR TO ERROR HALT ON SEQ ERROR 

MOV #BuFF,SP I STACK POINTER SETUP 

MOV iPETH5 f RTRAP5 f RETURN LOCATION 

J8R %0,%0 ) RESERVED INSTRUCTION, SHOULD TRAP 

MOV 9l73f »«IFATAL f MOVE TO MAILBOX * ##*#**# 173 

INC (R23 I SET MSGTYP TO FATAL ERROR 

HALT jDIDN'T TRAP, OR WRONG STSTNM 

I TO SCOPE REPLACE HALT W/ 240 
I AND REPLACE NEXT INST W/ 764 

RETHSS 

I TEST 46 TEST DECREMENT OF STACK POINTER ON A TRAP OPERATION 

TST46S IMC i#STESTN ? UPDATE TEST NUMBER 

CMP «46»9«tTESTN f SEQUENCE ERROR? 

BNE T5T47-12 |BR TO ERROR HALT ON SEQ ERROR 

MOV #BUFF,SP I STACK POINTER SETUP 

MOV «RETJ,RTRAP5 f RETURN POINTER 

JSR %0,%0 (RESERVED INSTRUCTION 

RETJi CMP SP,#BUFFs>4 f TEST DECREMENT OF SP 

BEQ TST47 

MOV #174,$#$FATAL f MOVE TO MAILBOX # 174 

INC (P23 f SET MSGTYP TO FATAL ERROR 

HALT | NOT DECREMENTED TWO WORDS, OR WRONG JTSTNM 
I TO SCOPE REPLACE HALT W/ 240 
I AND REPLACE NEXT INST W/ 761 



007170 005237 000304 



I TEST 47 
TST47I INC 



TEST THAT PROPER P.C, IS SAVED 



I UPDATE TEST NUMBER 



e MAXN , 


macyi 1 


27 (1006) 


04 < * > M&¥ 


DF&ASCa 


PI 1 


53«>MAY*»77 


08l42 




007 174 


022737 


0Q0047 


1?|2 


007202 


001012 




1713 


007204 


012706 


000500 


1734 


007210 


012767 


007220 


1753 


007216 


004000 




1736 


007220 


022767 


007220 


1757 


007226 


001405 




1758 


007230 


012737 


000175 


1759 


007236 


003212 




1750 


007240 


000000 




1761 








1702 








1763 








1764 








1785 








1765 








1767 


007242 


005237 


000304 


1768 


007246 


022737 


000030 


l7gg 


007254 


001040 




1770 


007256 


012706 


000300 


1771 


007262 


012767 


007300 


1772 


007270 


005067 


170502 


1773 


007274 


000257 




1774 


007276 


004000 




1775 


0Q7300 


026727 


171172 


1776 


007306 


001403 




1777 


007310 
uu / ax u 


012737 


000176 


1778 


y w r a. in 


005212 




1779 


007320 


000000 




1780 








1781 


007322 






1782 


012706 


000500 


1783 


007326 


012767 


007346 


1784 


007|34 


012767 


000357 


1785 


007342 


000277 




1786 


007344 


004000 




1787 


007 346 


026727 


17H24 


1788 


Oo7|54 


001405 




1789 


007356 


012737 


000177 


1790 


007364 


005212 




1791 


007 366 


000000 




1792 








1793 








1794 








1795 








1796 








1797 


007370 


005237 


000304 


179$ 


007374 


022737 


000031 


1799 


007402 


001H6 




1800 


007404 


012706 


000500 


1801 


Q07410 


012767 


007424 


1802 


007416 


005067 


170364 


1803 


007422 


004000 




1804 


007424 






1805 


007424 


100005 




1806 


007426 


012737 


000200 



08113 PAG 

f47 



TEST THAT PROPER P.C, IS SAVED 



000302 



CMP 


#47, 3S8TESTN 


BNE 


TST30-12 


MOV 


#BUFF,SP 


MOV 


•RETK, RTRAP5 


JSR 


%0,%0 


CMP 


#INSTK*2,BUFF»4 


BSC! 


TST50 


MOV 


#175,M8FATAL 


INC 


CR21 


HALT 





000304 



000000 
000302 



I TEST SO 
!*»««< 
TST50 



RETLS 



INC 
CMP 
BNE 
MOV 
MOV 
CLR 
CCC 
JSR 
CMP 
BEQ 
MOV 
INC 
HALT 



sec 

JSR 
CMP 
BEQ 
MOV 
INC 
HALT 



I TEST 51 



000302 



INC 
CMP 
BNE 
MOV 

MOV 
CLR 

JSR 

BPL 



j SEQUENCE ERROR? 

I BR TO ERROR HALT ON SEQ ERROR 

I STACK POINTER SETUP 

I RETURN FROM TRAP POINTER 

I TRAP ON THIS INSTRUCTION 

ICHECK FOR INCREMENFD P.C, 



?MOVE TO MAILBOX » #♦*#### 175 
I SET MSGTYP TO FATAL ERROR 
I INCORRECT P.C., OR WRONG $TSTNM 
I TO SCOPE REPLACE HALT W/ 240 
I AND REPLACE NEXT INST W/ 760 



TEST THAT "OLD" CC AND PRIORITY ARE PLACED ON STACK 



§#$TESTN 
#50,8#STE8TN 
TST51-12 
#BUFF,SP 

#RETL»RTRAP5 
CC 

%0,%0 

BUFF»2,#0 

IS 

#176# 8»$FATAL 
(R2) 



#BUFF,SP 
#RETMf RTRAP5 
#357, CC 

%0,%0 

BUFF-2,*357 

TST51 

#177,9*$FATAL 

(R23 



I UPDATE TEST NUMBER 

t SEQUENCE ERROR? 

I BR TO ERROR HALT ON SEQ ERROR 

I SET Up 

1 SET UP 

fCLEAR CC AND PRIORITY 
{TRAP 

; TEST THAT OLD STATUS WENT TO STACK 

j MOVE TO MAILBOX * #*##»## 176 
j SET MSGTYP TO FATAL ERROR 
1 INCORRCT STATUS 
T TO SCOPE REPLACE HALT W/ 240 
I AND REPLACE NEXT INST W/ 755 
I SET UP 
J SET UP 
f SET PRIORITY 
t SET CC 
I TRAP 

iCOMPARES STATUS ON STACK 



fMOVE TO MAILBOX # **##*## 177 
I SET MSGTYP TO FATAL ERROR 

I INCORRECT STATUS ON STACK, OR WRONG $TSTNM 
I TO SCOPE REPLACE HALT W/ 240 
> AND REPLACE NEXT INST W/ 732 



TEST THAT "NEW" STATUS IS CORRECT 



j UPDATE TEST NUMBER 

j SEQUENCE ERROR? 

j BR TO ERROR HALT ON SEQ ERROR 



88STESTN 
#5l,i#|TESTN 
TST52-12 
#BUFF,SP 
iPETN, RTRAP5 
RTPAP5+2 
%0,%0 

IS 

*2OO,003FATAL fMOVE TO MAILBOX 9 #**#**# 200 ***»##* 



j CLEAR FUTURE PRIORITY AND CC 
j TEST FOR »C" CLEARED 



s main 9 


MACY11 


27(1006) 


04«*MA¥ 


•77 08113 PAGE 


36 








DFKABC 


Pll 03»MAY*>77 


08142 




T51 


TEST 


THAT "NEW" STATUS 


IS CORRECT 




1807 


007434 


005212 








INC 


CR2) 


jSET MSGTYP TO FATAL ERROR 




1808 


007436 


000000 








HALT 




|C NOT CLEARED 




1809 
















I TO SCOPE REPLACE HALT W/ 


240 


1810 
















j AND REPLACE NEXT INST W/ 


761 


lill 


007440 








Hi 










1812 


007440 


001003 








BNE 


2$ 






1813 


007442 


012737 


000201 


000302 




MOV 


#201,§*8FATAL 


jMOVE TO MAILBOX * ««*«#«« 


> 201 


1814 


007430 


005212 








INC 


(R2) 


f SET MSGTYP TO FATAL ERROR 




1815 


007453 


000000 








HALT 




fZ NOT CLEARED 




1816 
















1 TO SCOPE REPLACE HALT W/ 


240 


1817 
















i AND REPLACE NEXT INST W/ 


733 


1818 


007434 








28S 










1819 


007454 


102005 








BVC 


3$ 






1820 


007456 


012737 


000202 


000302 




MOV 


#202,t#SFATAL 


jMOVE TO MAILBOX # 4HHHMMH 


* 202 


1821 


007464 


005212 








INC 


CR2) 


f SET MSGTYP TO FATAL ERROR 




1822 


007466 


000000 








HALT 




jV NOT CLEARED 




1823 
















I TO SCOPE REPLACE HALT W/ 


240 


1824 
















t AND REPLACE NEXT INST W/ 


745 


1825 


007470 








lis 










1826 


007470 


103005 








BCC 


4$ 






1827 


007472 


012737 


000203 


000302 




MOV 


#203,I#SFATAL 


j MOVE TO MAILBOX # ««««**< 


► 203 


1828 


007300 


005212 








INC 


CR2) 


jSET MSGTYP TO FATAL ERROR 




1829 


007502 


000000 








HALT 




|C NOT CLEARED 




1830 
















t TO SCOPE REPLACE HALT W/ 


240 


1831 
















1 AND REPLACE NEXT INST W/ 


737 


1832 


007504 


016700 


170266 




411 


MOV 


CC,%0 


t TEMP STORAGE 




1833 


007510 


001405 








BEQ 


58 






1834 


007312 


012737 


000204 


000302 




MOV 


#204, § 88FATAL 


I MOVE TO MAILBOX # ###*HHH 


» 204 


1835 


007520 


005212 








INC 


CR2) 


f SET MSGTYP TO FATAL ERROR 




1836 


007522 


000000 








HALT 




> PRIORITY NOT ZERO 




1837 
















I TO SCOPE REPLACE HALT W/ 


240 


1838 
















t AND REPLACE NEXT INST W/ 


727 


1839 


007524 


012706 


000500 




ssi 


MOV 


#BUFF,SP 






1840 


007530 


012767 


007S46 


170246 




MOV 


#RET0,RTPAP5 






1841 


007336 


012767 


000357 


170242 




MOV 


#337, STRAPS*? 


» SET NEW "CC" AND PRIORITY 




1842 


007344 


004000 








JSR 


%0,%0 


1 TRAP HERE 




1843 


007546 








RETOl 










1844 


007546 


100405 








BMI 


1$ 






1845 


007550 


012737 


000205 


000302 




MOV 


#20S*§#$FATAL 


fMOVE TO MAILBOX « #*#»«** 


i 205 


1846 


007556 


005212 








INC 


CR2) 


f SET MSGTYP TO FATAL ERROR 




1847 


007560 


000000 








HALT 




|N NOT SET 




1848 
















1 TO SCOPE REPLACE HALT W/ 


240 


1849 
















1 AND REPLACE NEXT INST W/ 


710 


1850 


007362 








its 










1851 


007562 


001405 








BEQ 


2$ 






1832 


007564 


012737 


000206 


000302 




MOV 


#206»##$F&W 


I MOVE TO MAILBOX # ###*#♦« 


> 206 


1853 


007572 


005212 








INC 


CR2) 


f SET MSGTYP TO FATAL ERROR 




1834 


007574 


000000 








HALT 




|Z NOT SET 




1855 
















1 TO SCOPE REPLACE HALT W/ 


240 


1856 
















j AND REPLACE NEXT INST W/ 


702 


1837 


007376 








Ml 










1858 


007376 


102405 








BVS 


30 






1839 


007600 


012737 


000207 


000302 




MOV 


#207,f#SFATAL 


fMOVE TO MAILBOX « #»*«««« 


> 207 


1860 


007606 


005212 








INC 


(R2) 


f SET MSGTYP TO FATAL ERROR 




1861 


007610 


000000 








HMiT 




|V NOT SET 




















1 TO SCOPE REPLACE HALT W/ 


240 



SEQ 0036 



.MAIN, MACY11 27(10065 04-MAY-77 08113 PAGE 37 

DFKABC ,P1 1 03-MAY-77 08|42 T51 TEST THAT "NEW STATUS IS CORRECT 



SEQ 00 37 



1863 








1864 


00761 2 






1 865 




1 03405 




1866 


007614 


012737 


A Aft 9 1 ft 

V V V « ft M 


186? 


007622 


005212 




1868 


007624 


A ft A A ft ft 




1869 








1870 








1871 


007 Q£y 


ft 4 &7 A A 

UIO 'UU 


1701 44 


1872 




0997 aa 


000397 


1873 




001403 




1874 


007 S 4 


012737 




1 875 


007646 






1876 


007650 


ft ftftftftft 

uuuuuu 




1877 








1878 








1879 
















1881 








1882 








1883 


0076S2 


005237 


ft A A 1ft A 

Vvv JU^ 


1834 


007656 


0227 37 


AA AA K 9 

VUUvtfA 


1985 




nft i ft a*? 

Uv I UU / 






00 7 566 




A A ft R A ft 

000300 


1887 


007672 


ft 197*7 


0077 16 




UU f 7 UU 


005767 




1889 




012737 


AAA9 < 9 
UUU< I A 






005212 




1891 


AA"T « A 

07714 


ftftft AAA 

uuuuuu 




1892 








1893 








1894 
















1 896 








1 897 








1898 




_ 


AAA 9 A A 
UUU«fU9 


1899 


nrt7799 


r>997*7 
Ant It I 


Art A AS * 

SIUUU3 3 




007730 


001012 




1901 


007732 




ft A A^ ft ft 

000300 


1902 




ni 97fi7 




1903 


aa7744 


005767 


170031 


1904 




020627 


ftft A A"! A 
UUU^ f «g 


190S 


007754 


ft A 4 A AHi 
UU * ■» USJ 




1906 


007756 


012737 


91 - 


1907 








1908 


nn77fi& 


A A Art Aft 

uuuuuu 




1 909 
















1911 








1913 








1913 








1914 


007770 


005237 


000304 


191S 


007774 


022737 


000054 


1916 


010002 


001013 




1917 


010004 


012706 


000500 


1918 


010010 


012767 


010022 



000302 



BCS 
MOV 
INC 
HALT 



MOV 
CMP 
BEG 
MOV 
INC 
HALT 



48 

#210,9»SFATAL 

(P2) 



CC,%0 

S357,%0 

TST52 

#21 1 # GiSFATAL 

(P2) 



t AND REPLACE NEXT INST W/ 674 



j MOVE TO MAILBOX S ******* 210 ******* 
•SET MSGTYP TO FATAL ERROR 
}C NOT SET 

f TO SCOPE REPLACE HALT W/ 240 
j AND REPLACE NEXT INST W/ 666 



I MOVE TO MAILBOX * *»**«*» 211 **** 

1 SET MSGTYP TO FATAL ERROR 

f PRIORITY WAS CHANGED, OR WRONG STSTNM 

f TO SCOPE REPLACE HALT W/ 240 

I AND REPLACE NEXT INST W/ 654 



I ************************************************************************************ 

I TEST 52 TEST THAT A TRAP 0CCURES ON AN ILLEGAL ADDRESS 

1 ************************************************************************************ 



TST52I 



170104 
000302 



g#8TESTN 
#52#i#8TESTN 
TST53-12 
#BUFF,SP 
#RETP, RTRAP5 



j UPDATE TEST NUMBER 
j SEQUENCE ERROR? 
t BR TO ERROR HALT ON SEQ ERROR 
; STACK POINTER SETUP 
j RETURN LOCATION 

•ILLEGAL ADDRESS INSTRUCTION, SHOULD TRAP 
I MOVE TO MAILBOX # ******* 2X2 ******* 
j SET MSGTYP TO FATAL ERROR 

; ILLEGAL ADDRESS DID NOT TRAP, OR WRONG STSTNM 
f TO SCOPE REPLACE HALT W/ 240 
f AND REPLACE NEXT INST W/ 763 

RETPI 

I »**«#»**«#*««*#«*«**«**«**«#**«««^ 

j TEST 53 TEST DECREMENT OF STACK POINTER ON A TRAP OPERATION 

1*************************************************0********************************** 



INC 

CMP 

BNE 

MOV 

MOV 

TST 1 

MOV 

INC 

HALT 



*2l2,e«8FATAL 

CP2) 



000304 
170040 

000302 



000304 
167766 



TST53I 


INC 


?#gTESTN 


t UPDATE TEST NUMBER 




CMP 


#53»9*8TESTN 


j SEQUENCE ERROR? 




BNE 


TST54-12 


t BR TO ERROR HALT ON SEQ ERROR 




MOV 


#BUFF,SP 


jSTACK POINTER SETUP 




MOV 


#RETQ, RTRAP5 


t RETURN POINTER 




TST 1 




% RESERVED INSTRUCTION 


RETQi 


CMP 


SP,8BUFF»4 


\ TEST DECREMENT OF SP 




BEQ 


TST54 






MOV 


#2t3,©#8FATAL 


f MOVE TO MAILBOX # ******* 213 ******* 




INC 


CR2) 


I SET MSGTYP TO FATAL ERROR 




HALT 




1 NOT DECREMENTED TWO WORDS, OR WRONG STSTNM 



j TO SCOPE REPLACE HALT W/ 240 
j AND REPLACE NEXT INST W/ 760 

f TEST 54 TEST THAT PROPER P.C, IS SAVED 

%*®*********®*************®*************** 

TST54I INC e#6TESTN f UPDATE TEST NUMBER 

CMP #54,P#8TESTN ; SEQUENCE ERROR? 

BNE TST55-12 j BR TO ERROR HALT 0*' SEQ ERROR 

MOV »RUFF,SP t STACK POINTER SETUP 

MOV #RETR, PTRAP5 j RETURN FROM TRAP POINTER 



gMAlNg 


MACYli 


27(1006) 


04»MAY 


-77 08 


113 PAGE 38 






DFKABC 


Pll 03-MAY-77 


08142 




T54 


TEST 


THAT PROPER P.C„ IS 


SAVED SEQ 


1919 


010016 


005767 


167757 






TST 1 




; TRAP ON THIS INSTRUCTION 


1920 


010022 


022767 


010022 


170444 


RETRi 


CMP 


# 4 ,BUFF«4 


;CHECK FOR INCREMENTED P.C, 


1921 


010030 


001405 








BEQ 


TST55 




1922 


010032 


012737 


000214 


000302 




MOV 


#2l4,M8FATAL 


jMOVE TO MAIL9UX * ******* 214 ******* 


1933 


010040 


005212 








INC 


CP25 


J SET MSGTYP TO FATAL ERROR 


1924 


010042 


000000 








HALT 




j INCORRECT P.C., OP WRONG STSTNM 


1925 
















j TO SCOPE REPLACE HALT W/ 240 


1926 
















t AND REPLACE NEXT INST W/ 757 


1927 












1928 










1 TEST 


55 


TEST THAT "OLD" 


CC AND PRIORITY APE PLACED ON STACK 


1929 












1930 


010044 


005237 


000304 




TST551 


INC 


3#8TESTN 


j UPDATE TEST NUMBER 


1931 


010050 


022737 


000055 


000304 




CMP 


#55#?*STESTN 


j SEQUENCE ERROR? 


1932 


010056 


001042 








BNE 


TST56-12 


t BR TO ERROR HALT ON SEQ ERROR 


1933 


010060 


012706 


000500 






MOV 


#BUFF,SP 


JSET UP 


1934 


010064 


012767 


010104 


167712 




MOV 


f PETS, RTRAP5 


jSET UP 


1935 


010072 


005067 


167700 






CLR 


CC 


j CLEAR CC AND PRIORITY 


1936 


010076 


000257 








CCC 






1937 


010100 


005767 


167675 






TST 1 




j TRAP 


1938 


010104 


026727 


170366 


000000 


RETSt 


CMP 


BUFF«*2,$0 


; TEST THAT OLD STATUS WENT TO STACK 


1939 


010112 


001405 








BEQ 


18 




1940 


010114 


012737 


000215 


000302 




MOV 


#2l5,S#8FATAL 


f MOVE TO MAILBOX # ##**♦** 215 ##***## 


1941 


010122 


005212 








INC 


(R2) 


JSET MSGTYP TO FATAL ERROR 


1942 


010124 


000000 








HALT 




; INCORRECT STATUS 


1943 
















j TO SCOPE REPLACE HALT W/ 240 


1944 
















t AND REPLACE NEXT INST W/ 754 


1945 


010126 


012706 


000500 




iSt 


MOV 


#BUFF,SP 


jSET UP 


1946 


010132 


012767 


010154 


167644 




MOV 


#PETT, RTRAP5 


jSET UP 


1947 


010140 


012767 


000357 


167630 




MOV 


#357, CC 


♦SET PRIORITY 


1948 


010146 


000277 








see 




j SET CC 


1949 


010150 


005767 


16762S 






TST 1 




i TRAP 


1950 


010154 


026727 


170316 


000357 


RETT! 


CMP 


BUFF»2##357 


{COMPARES STATUS ON STACK 


1951 


010162 


001405 








BEQ 


TST56 




1952 


010164 


012737 


000216 


000302 




MOV 


#216,»*SFATAL 


; MOVE TO MAILBOX S *#**#♦# 216 #*#*#*# 


1953 


010172 


005212 








INC 


CR2> 


jSET MSGTYP TO FATAL ERROR 


1954 


010174 


000000 








HALT 




j INCORRCT STATUS ON STACK, OR WRONG STSTNM 


1955 
















j TO SCOPE REPLACE HALT W/ 240 


1933 
















1 AND REPLACE NEXT INST W/ 730 


1957 












1958 










} TEST 


56 


TEST THAT "NEW" 


STATUS IS CORRECT 


1939 














1960 


010176 


005237 


000304 




TST56I 


INC 


M8TESTN 


; UPDATE TEST NUMBER 


1961 


010202 


022737 


000056 


000304 




CMP 


#56,a#8TESTN 


? SEQUENCE ERROR? 


1962 


010210 


001121 








BNE 


TST57-12 


J BR TO ERROR HALT ON SEQ ERROR 


1963 


010212 


012706 


000500 






MOV 


8BUFF,SP 




1964 


010216 


012767 


010234 


167560 




MOV 


tRETU, RTRAP5 




1965 


010224 


005067 


167556 






CLR 


RTRAP5+2 


; CLEAR FUTURE PRIORITY AND CC 


1966 


010230 


005767 


167545 




RETUi 


TST 1 




f TRAP HERE 


1967 


010234 












f TEST FOR "C" CLEARED 


1968 


010234 


100005 








BPL 


18 




1969 


010236 


012737 


000217 


000302 




MOV 


#2l7,9#8FATAL 


f MOVE TO MAILBOX « ******* 217 


1970 


010244 


005212 








INC 


CP2) 


f SET MSGTYP TO FATAL ERROR 


1971 


010246 


000000 








HALT 




|C NOT CLEARED 


1972 
















I TO SCOPE REPLACE HALT W/ 240 


1973 
















? AND REPLACE NEXT INST W/ 760 


1974 


010250 








18S 
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DFKABC 8 


Pit 03»MAY*77 


08S42 




T56 


TEST 


THAT "NEW" STATUS 


IS CORRECT 


1975 


01 0250 


001005 








BNE 


2$ 




1976 


010252 


012737 


000220 


000302 




MOV 


#220,®#SFATAL 


fMOVE TO MAILBOX # ######» 220 


1977 


010260 


005212 








INC 


(P2) 


I SET MSGTYP TO FATAL ERROR 


1978 


010262 


000000 








HALT 




fZ NOT CLEARED 


1979 
















I TO SCOPE REPLACE HALT W/ 240 


1980 
















I AND REPLACE NEXT INST W/ 752 


1981 


010264 








2tl 








1982 


010264 


1 02005 








BVC 


3S 




1983 


010266 


012737 


000221 


000302 




MOV 


• 2 2 1 # M9FATAL 


I MOVE TO MAILBOX # »###### 221 


1984 


010274 


005212 








INC 


CR2) 


j SET MSGTYP TO FATAL ERROR 


1985 


010276 


000000 








HALT 




1 V NOT CLEARED 


1986 
















? TO SCOPE REPLACE HALT W/ 240 


1987 
















1 AND REPLACE NEXT INST W/ 744 


1988 


01 0300 








3@S 








1989 


010300 


103005 








sec 


4$ 




1990 


010302 


012737 


000222 


000302 




MOV 


#222»MIFATAL 


I MOVE TO MAILBOX t #####** 222 


1991 


010310 


005212 








INC 


CP2) 


j SET MSGTYP TO FATAL ERROR 


1992 


010312 


000000 








HALT 




}C NOT CLEARED 


1993 
















1 TO SCOPE REPLACE HALT W/ 240 


1994 
















I AND REPLACE NEXT INST W/ 736 


1995 


010314 


032767 


000357 


167454 


4$i 


BIT 


#35?#CC 


1 TEST PRIORITY FOP ZERO 


1996 


010322 


001405 








BEG 


58 




1997 


010324 


01 2737 


000223 


000302 




MOV 


*223f MIFATAL 


fMOVE TO MAILBOX t #♦###*# 223 


1998 


010332 


005212 








INC 


(P2) 


f SET MSGTYP TO FATAL ERROR 


1999 


010334 


000000 








HALT 




f PRIORITY NOT ZERO 


2000 
















% TO SCOPE REPLACE HALT W/ 240 


2001 
















I AND REPLACE NEXT INST W/ 725 


3002 


010333 


012706 


000300 




5$t 


MOV 


•BUFF,SP 




2003 


010342 


012767 


010362 


167434 




MOV 


•RETV, RTRAP5 




2004 


010350 


012767 


000357 


167430 




MOV 


#357,RTRAP5+2 


I SET NEW "CC» AND PRIORITY 


2005 




3 7 O 7 


167417 




RETVl 


TST 1 




I TRACE HERE 


2003 


1 0362 














2007 


010362 


1 00903 








BMI 


IS 




2008 


0103w4 


012737 


000224 


000302 




MOV 


#224, StSFATAL 


fMOVE TO MAILBOX # ####### 224 


2009 


010372 


003212 








INC 


(R25 


f SET MSGTYP TO FATAL ERROR 


2010 


010374 


OOOOvu 








HALT 




|N NOT SET 


2011 
















f TO SCOPE REPLACE HALT W/ 240 


2012 
















I AND REPLACE NEXT INST W/ 705 


2013 


A « A « *? £& 
010 3/6 








111 








2014 


010376 


001903 








BEQ 


2$ 




2013 


01 0400 


012737 


000225 


000302 




MOV 


#225,§#SFATAL 


f MOVE TO MAILBOX • **#«**» 225 


2016 


01 0406 


005212 








INC 


(R2> 


f SET MSGTYP TO FATAL ERROR 


2017 


010410 


000000 








HALT 




iZ NOT SET 


2018 
















I TO SCOPE REPLACE HALT W/ 240 


2019 
















f AND REPLACE NEXT INST W/ 677 


2020 


010412 








2$S 








2021 


010412 


4 AAA All 

1 02403 








BVS 


33 




2022 


010414 


0127 3 / 


000226 


000302 




MOV 


• 226 , 8#$FATAL 


1 MOVE TO MAILBOX # »##•##* 226 


2023 




005212 








INC 


(R2) 


f SET MSGTYP TO FATAL ERROR 


2034 


010424 


000000 








HALT 




1 V NOT SET 


2025 
















f TO SCOPE REPLACE HALT W/ 240 


2026 
















f AND REPLACE NEXT INST W/ 671 


2027 


010426 








m 








2028 


010426 


103405 








BCS 


4$ 




2029 


010430 


012737 


000227 


000302 




MOV 


#227,@#$FATAL 


fMOVE TO MAILBOX 9 «*•#«•# 227 


2030 


010436 


005212 








INC 


(R2) 


f SET MSGTYP TO FATAL ERROR 



##*#«•# 



#***•»* 
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DFK&BC 


Pll 03»M&y»77 


08142 




T56 TEST 


THAT *NEW« STATUS 


IS CORRECT SEQ 


2031 


010440 


000000 






HALT 




f C NOT SET 


2032 














f TO SCOPE REPLACE HALT W/ 240 


2033 














f AND REPLACE NEXT INST W/ 663 


2034 


010442 


016700 


167330 




41 1 MOV 


CC,%0 




2033 


010446 


022700 


000357 




CMP 


#357, %0 




2036 


010452 


001405 






BEQ 


TSTS7 




S037 


010454 


012737 


000230 


000302 


MOV 


#230»®#$FATAL 


fMOVE TO MAILBOX # »«**«** 230 ##•#### 


2038 


010462 


005212 






INC 


CR2) 


f SET MSGTYP TO FATAL ERROR 


2039 


010464 


000000 






HALT 




f PRIORITY WAS CHANGED, OP WRONG STSTNM 


2040 














f TO SCOPE REPLACE HALT W/ 240 


2041 














f AND REPLACE NEXT INST W/ 651 


2042 










f 


2043 










f TEST 57 


TEST THAT DECREMENT R6 TO A VALUE LESS THAN 400 TRAPS 


2044 










f 


2045 


010466 


005237 


000304 




TST57I INC 


##8TESTN 


f UPDATE TEST NUMBER 


2046 


010472 


022737 


OO00S7 


000304 


CMP 


#S7»$#$TESTN 


f 8E0UENCE ERROR? 


2047 


010500 


001006 






BNE 


TST60»12 


f BP TO ERROR HALT ON SEQ ERROR 


2048 


010502 


012706 


000130 




MOV 


#150, %6 


fR6 ■ 150 


2049 


OIO3O6 


012767 


010530 


167270 


MOV 


#TDEC1,4 


f STACK OVERFLOW TRAP POINTER 


2030 


010514 


005746 






TST 


"(6) 


f WITH R6 ■ 150 SHOULD TRAP 


2051 


010516 


012737 


000231 


000302 


MOV 


#231#8#$FATAL 


fMOVE TO MAILBOX t «**«*«« 231 #*#*#«# 


2052 


010524 


003212 






INC 


CR2) 


f SET MSGTYP TO FATAL ERROR 


2053 


010523 


000000 






HALT 




f SHOULD HAVE TRAPPED, OR WRONG JTSTNM 


2034 














f TO SCOPE REPLACE HALT W/ 240 


2055 














f AND REPLACE NEXT INST W/ 764 


2056 


010530 








TDECi % 






2037 
















2058 












2059 










t TEST 60 


TEST FOR DECREMENT OF R6 ON OVERFLOW TRAP 


2060 












2061 


010330 


003237 


000304 




TST60S INC 


MtTESTN 


f UPDATE TEST NUMBER 


2062 


010534 


022737 


000060 


000304 


CMP 


#60,M$TESTN 


f SEQUENCE ERROR? 


2063 


010342 


001011 






BNE 


TST61»12 


f BR TO ERROR HALT ON SEQ ERROR 


2064 


010544 


012706 


000150 




MOV 


#150»%6 


fR6 ■ 150 


2065 


010550 


012767 


010560 


167226 


MOV 


STDEC2»4 


f TRAP POINTER 


2066 


010536 


005746 






TST 


«®(6) 


f WITH R6 ■ 150 SHOULD TRAP 


2067 


O105S0 


020627 


000142 




TDEC2} CMP 


%6,#142 


f DID R6 DECREMENT 


2068 


010564 


001403 






BEO 


T8T61 




2069 


010366 


012737 


000232 


000302 


MOV 


#232,##$FATAL 


fMOVE TO MAILBOX S »*«*•«» 232 


2070 


010574 


005212 






INC 


(R2) 


f SET MSGTYP TO FATAL ERROR 


2071 


010576 


000000 






HALT 




f R6 NOT ■ 142, OR WRONG STSTNM 


2072 














f TO SCOPE REPLACE HALT W/ 240 


2073 














f AND REPLACE NEXT INST W/ 761 


2074 
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SEO 0041 



2075 








2076 








2077 








2078 


010300 


005237 


000304 


2079 


010604 


022737 


000061 


2080 


010612 


001043 




2081 


010614 


012706 


000130 


2082 


010620 


005067 


167322 


2083 


010624 


012767 


010634 


2084 


010632 


005246 




208S 


010634 


005767 


167306 


2086 


010640 


001003 




2087 


010642 


012737 


000233 


2088 


010690 


005212 




2089 


010652 


000000 




2090 








2091 








2092 


010654 


012705 


001000 


2093 


010660 


012706 


000400 


2094 


010664 


012767 


010706 


2095 


010672 


124643 




2096 


010674 


012737 


000234 


2097 


010702 


005212 




2098 


010704 


000000 




2099 








2100 








2101 


010706 


012706 


000400 


2102 


010712 


012767 


010734 


2103 


010720 


134546 




2104 


010722 






2109 


010722 


012737 


000235 


2106 


010730 


005212 




2107 


010732 


000000 




2108 








2109 








2110 


010734 






2111 








2112 








2113 








2114 








2115 


010734 


005237 


000304 


2116 


010740 


022737 


000062 


2117 


010746 


001011 




2118 


010750 


012706 


000400 


2119 


010754 


012767 


010772 


2120 


010762 


012767 


011004 


2121 


010770 


000007 




2122 


010772 






2123 


010772 


012737 


000236 


2124 


011000 


005212 




212S 


011002 


000000 




2126 








212? 








2128 


011004 


012767 


000012 


2129 








2130 









I TEST 61 TEST DIFFERENT TYPES OF OVERFLOW 

}#««#*»«*#«*****»*#*»«****•#«**»**««#*«**»**«*«»*»«»#««*##««*««#«#*#**•***»*«**#»«*«* 



167152 



000302 



167112 
000302 



167064 
000302 



TDEC4I 



TDEC61 



00/0304 



167026 
167014 



INC 
CMP 
BNE 
MOV 
CLR 
MOV 
INC 
TST 
BNE 
MOV 
INC 
HALT 



MOV 

MOV 

MOV 

CMPB 

MOV 

INC 

HALT 



MOV 
MOV 
BITB 

MOV 
INC 
HALT 



lifiTESTN 
#6l#i#STESTN 
TST62-12 
#150, %6 
146 

»TDEC3,4 

"(6) 

146 

1$ 

*233» IM3FATAL 

CR2) 



#1000, %5 

#400, %6 

#TDEC4,4 

»C6)#»(5) 

S234,MSFATAL 

(R2) 



#400, %6 

#TDEC7,4 
»(5)»»(6) 

#235,®#9FATAL 
(P2) 



***«««* 



I «**«##«»«•*««««**««**»*«***»< 
I TEST 62 TEST THAT AN 

I #»#**##*####»♦»####♦######*# 



VDEC2I 



INC 
CMP 
BNE 
MOV 
MOV 
MOV 
7 

MOV 
INC 
HALT 



a#STESTN 
«62*0#STESTN 

VDEC2 
«?400»%6 
#VDEC2*10 
#VDECi,4 



I UPDATE TEST NUMBER 
I SEQUENCE ERROR? 
j BR TO ERROR HALT ON SEQ ERROR 

I STATUS WORD OF LOG 10 
j RETURN TO LOC 4 



jMOVE TO MAILBOX # ####### 233 
I SET MSGTYP TO FATAL ERROR 
I INCREMENT OPERATION NOT INHIBITED 
t TO SCOPE REPLACE HALT W/ 240 
i AND REPLACE NEXT INST W/ 757 



j MOVE TO MAILBOX ft ««**«** 234 ##**#** 
j SET MSGTYP TO FATAL ERROR 

I STACK s 400 AND DECREMENTED, SHOULD TRAP 
; TO SCOPE REPLACE HALT W/ 240 
j AND REPLACE NEXT INST W/ 742 



I MOVE TO MAILBOX S 235 
*SET MSGTYP TO FATAL ERROR 
|N0 STACK. OVERFLOW, Op WRONG STSTNM 
; TO SCOPE REPLACE HALT «/ 240 
j AND REPLACE NEXT INST W/ 727 



7 CAUSES AN OVERFLOW TRAP 

•»######*##».»##»##*###*»#^###*##«-»**'»##*«####'» 
1 UPDATE TEST NUMBER 
j SEQUENCE ERROR? 
I BR TO ERROR HALT ON SEQ ERROR 
I SET UP STACK TO OVERFLOW 
t SET UP 7 VECTOR 
*, SET UP OVERFLOW VECTOR 
jTHIS TRAP SHOULD CAUSE OVERFLOW 



#236,«#SFATAL 

(R2) 



166776 VDECll MOV 



I »*«*««««««#«#«**«*«*»#«*«««« 

I TEST 63 TEST THAT AN 



jMOVE TO MAILBOX 8 236 ####### 

f SET MSGTYP TO FATAL ERROR 

j TRAP FLAG OVERFLOW DID NOT OCCUR, OR WRONG STSTNM 
f TO SCOPE REPLACE HALT W/ 240 
1 AND REPLACE NEXT INST W/ 761 

######»♦#*##*##»###*#♦##*###»#♦#**##*#**##*##»####***#*# 

IOT CAUSES AN OVERFLOW TRAP 
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2131 








2133 


011012 


005237 


000304 


2133 


011016 


022737 


000063 


2134 


011024 


001011 




213S 


011026 


012706 


000400 


2136 


011032 


012767 


011050 


2137 


011040 


012767 


011062 


2138 


011046 


000004 




2139 


011050 






2140 


OHOSO 


012737 


000237 


2141 


011056 


005212 




2142 


011060 


000000 




2143 








2144 








2145 


0110*2 


012767 


000022 


2146 








2147 








2148 








2)49 


011070 


005237 


000304 


2150 


011074 


022737 


000064 


2151 


011)02 


001011 




2152 


011104 


012706 


000400 


2153 


011110 


012767 


011126 


2154 


011116 


012767 


011140 


2155 


011124 


104000 




2156 


011126 






2157 


011126 


012737 


000240 


2138 


011134 


005212 




2159 


011136 


000000 




2160 








2161 








2162 


011140 


01276? 


000032 


2163 








2164 








2163 








2166 


01U46 


005237 


000304 


2167 


011152 


022737 


000065 


2168 


011160 


001011 




2169 


011162 


012706 


000400 


2170 


01H66 


012767 


011204 


2171 


011174 


012767 


011216 


2172 


011202 


104400 




2173 


011204 






2174 


011204 


012737 


000241 


2175 


0H212 


005212 




2176 


011214 


000000 




2177 








2178 








2179 


011216 


012767 


000036 


2180 








2181 








2182 








2183 


011224 


005237 


000304 


2184 


011230 


022737 


000066 


2185 


011236 


001011 




2186 


011240 


012706 


000400 



166760 
166736 



TST63I 



VDEC4I 



000304 



166712 
166660 



166640 

166602 



000304 



INC 


0*$TESTN 


1 UPDATE TEST NUMBER 


CMP 


#63#$#STESTN 


1 SEQUENCE ERROR? 


BNE 


VDEC4 


t BR TO ERROR HALT 0« SEQ ERROR 


MOV 


«4Q0r%6 


I SET UP STACK TO OVERFLOW 


MOV 


#VDEC4,20 


f SET UP IOT VECTOR 


MOV 


#VDEC3,4 


jSET UP OVEPFLOW VECTOR 


IOT 




jTHIS TRAP SHOULD CAUSE OVERFLOW 


MOV 


#237,P#8FATAL 


1 MOVE TO MAILBOX * 237 


INC 


(R2) 


1 SET MSGTYP TO FATAL ERROR 


HALT 




jTRAP FLAG OVERFLOW DID NOT OCCUR, OR WRONG STSTNM 






j TO SCOPE REPLACE HALT W/ 240 






f AND REPLACE NEXT INST W/ 761 



166730 VDEC3I MOV 



I TEST 64 TE5T THAT AN EMT CAUSES AN OVERFLOW TRAP 

!#*«*«<»***»•«•*****##**»*#*«**««»«*##«*«««*#**»*«*«««*#«*##«•««**«*««*««**#*»««***«** 



VDEC6I 



166662 VDEC5S 



INC 
CMP 
BNE 
MOV 
MOV 
,MOV 
EMT 

MOV 
INC 
HALT 



9*$TESTN 
#64,9*STESTN 
VDEC6 
#400#%6 
IVDEC6,30 
#VDEC5,4 



#240,P#SFATAL 
(R2) 



I UPDATE TEST NUMBER 
I SEQUENCE ERROR? 
j BR TO ERROR HALT ON SEQ ERROR 
jSET UP STACK TO OVERFLOW 
I SET UP EMT VECTOR 
I SET UP OVERFLOW VECTOR 
jTHIS TRAP SHOULD CAUSE OVERFLOW 

240 



j MOVE TO MAILBOX * *##*#♦# 
I SET MSGTYP TO FATAL ERROR 
I TRAP FLAG OVERFLOW DID NOT OCCUR, OR WRONG STSTNM 
f TO SCOPE REPLACE HALT W/ 240 
f AND REPLACE NEXT INST W/ 761 



I TEST 65 TEST THAT AN TRAP CAUSES AN OVERFLOW TRAP 

I »***«»««#««*»««»*#«*»***«*»«««*««*«*»*«*«*•»«*«»»«»««#«##***«««#«»*«****««*«*«*«**** 



INC 
CMP 
BNE 
MOV 
MOV 
MOV 
TRAP 

MOV 
INC 
HALT 



166610 VDEC7I MOV 



MSTESTN 
#65r9*$TESTN 

VDEC8 
$400, %6 
#VDEC8,34 
#VDEC7,4 



*241* MtFATAL 

CP2) 



I UPDATE TEST NUMBER 
I SEQUENCE ERROR? 
f BR TO ERPOR HALT ON SEQ ERROR 
I SET UP STACK TO OVERFLOW 
X SET UP TRAP VECTOR 
jSET UP OVERFLOW VECTOR 
f THIS TRAP SHOULD CAUSE OVERFLOW 

241 



#344-2; 34 



} MOVE TO MAILBOX « *«*«««« 
jSET MSGTYP TO FATAL ERROR 
j TRAP FLAG OVERFLOW DID NOT OCCUR, OP WRONG STSTNM 
f TO SCOPE REPLACE HALT W/ 240 
I AND REPLACE NEXT INST W/ 761 



I TEST 66 TEST THAT AN TPT CAUSES AN OVERFLOW TRAP 

I »««•*#*«**»«#«*»«*«*«*««»#«««««»»*«**»•#*«•««#»#««*«««««»*»#*««»«««•#««*«**«**«#**•» 

TST66I INC StSTESTN j UPDATE TEST NUMBER 

CMP #66,9#STESTN ; SEQUENCE ERROR? 

BNE VDEC10 1 BR TO ERPOR HALT ON SEQ ERROR 

MOV «400,%6 j SET UP STACK TO OVERFLOW 
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SEQ 0043 



2187 
2188 
2189 
2190 
2191 
2192 
2193 
2194 
2195 
2196 
2197 
2198 
2199 
2200 
2201 
2202 
2203 
2204 
2203 
2206 
2307 
2301 
2209 
2210 
2211 
3212 
2213 
2214 
2215 
2216 
2217 
2218 
2219 
2220 
2231 
2222 
2223 
2224 
222S 
2226 
2227 
2228 
2229 
2230 
2231 
2232 
3233 
2234 
2233 
2236 
2237 
2238 
2239 
2240 
3241 
2242 



011244 
011232 
011260 
011262 
011262 
011270 
011272 



012767 
012767 
000003 

012737 
005212 

000000 



011262 
011274 



166542 

166534 



000242 000302 



MOV 
MOV 
TRT 

MOV 
INC 
HALT 



011274 012767 000016 166512 VDEC9S MOV 



#VDEC10i 14 
•VDEC9,4 



$242* @#8FATAL 
(R23 



#14+2,14 



I.SET UP TRT VECTOR 

f SET UP OVERFLOW VECTOR 

I THIS TRAP SHOULD CAUSE OVERFLOW 

j MOVE TO MAILBOX t ««•**«« 242 *##«##* 

I SET MSGTYP TO FATAL ERROR 

I TRAP FLAG OVERFLOW DID NOT OCCUR, OR WRONG $TSTNM 
f TO SCOPE REPLACE HALT W/ 240 
I AND REPLACE NEXT INST W/ 761 



011302 

011306 
011314 
011316 
011322 
011330 
011336 
9U340 
011340 
011346 
011350 



011352 
011360 
011364 
011366 
911374 
011376 



011400 
011404 
011412 
011414 
011420 
011426 
011434 
011436 
011436 
QU444 
011446 



005237 
022737 
001011 
012706 
012767 
012767 
004700 

012737 
005212 

000000 



000304 
000067 

000400 
011340 
0U352 



f TEST 67 TEST THAT AN ILLA CAUSES AN OVERFLOW TRAP 



000304 



166454 
166446 



000243 000302 



TST67i 



VDEClii 



INC 
CMP 
BNE 
MOV 
MOV 
MOV 
ILLA 

MOV 
INC 
HALT 



Mf TESTN 

#67,i#STESTN 
VDECU 
#400, %6 
#VDEC11,4 
#VDEC12,4 



#243,0ftSFATAL 

CR2) 



005237 
022737 

001011 
012706 
012767 
012767 
000100 

012737 
005212 

000000 



000304 

000070 

000400 
011436 
011450 



I UPDATE TEST NUMBER 
; SEQUENCE ERROR? 
j BR TO ERROR HALT ON SEQ ERROR 
I SET UP STACK TO OVERFLOW 
I SET UP ILLA VECTOR 
> SET UP OVERFLOW VECTOR 
I THIS TRAP SHOULD CAUSE OVERFLOW 

I MOVE TO MAILBOX # *»««*«* 243 ####*## 

I SET MSGTYP TO FATAL ERROR 

} TRAP FLAG OVERFLOW DID NOT OCCUR, OR WRONG 8TSTNM 
I TO SCOPE REPLACE HALT W/ 240 
% AND REPLACE NEXT INST W/ 761 

I STACK PUSHED FOUR WORDS? 

I MOVE TO MAILBOX # 244 
I SET MSGTYP TO FATAL ERROR 
I TRAP OVERFLOW DID NOT OCCUR 
I TO SCOPE REPLACE HALT W/ 240 
I AND REPLACE NEXT INST W/ 746 

I 

I TEST 70 TEST THAT AN ILLB CAUSES AN OVERFLOW TRAP 

I ##########*#####*###########**#•*##*##*########»####*###*#*###•##»#**♦»###*####*##*# 



012767 


000006 


166424 


VDEC12I MOV 


14+2,4 


020627 


000370 




CMP 


%6,#370 


001403 






BEQ 


TST70 


013737 


000244 


000302 


MOV 


#244,9#tFATAL 


005312 






INC 


(P2> 


000000 






HALT 





166356 
166350 



000245 000302 



011450 013767 000006 166336 



011456 005337 000304 



TST70I 


INC 


9#$TESTN 


% UPDATE TEST NUMBER 




CMP 


*70,?#9TESTN 


f SEQUENCE ERROR? 




BNE 


VDEC13 


1 BR TO ERROR HALT ON SEQ ERROR 




MOV 


#400, %6 


f SET UP STACK TO OVERFLOW 




MOV 


#VDEC13,4 


I SET UP ILLB VECTOR 




MOV 


#VDEC14,4 


1 SET UP OVERFLOW VECTOR 




ILLB 




»THI8 TRAP SHOULD CAUSE OVERFLOW 


VDEC13I 










MOV 


#245,M8FATAL 


I MOVE TO MAILBOX ft 245 




INC 


CR2) 


I SET MSGTYP TO FATAL ERROR 




HALT 




I TRAP FLAG OVERFLOW DID NOT OCCUR, OR WRONG 
1 TO SCOPE REPLACE HALT W/ 240 
1 AND REPLACE NEXT INST W/ 761 


VDEC14I 


MOV 


#4+2,4 





f TEST 71 TEST FOR FALSE OVERFLOW TRAP 

I ««*•#««#»««#«««*«*#«•*#*«««*««««#*»»«««««»**•«»«##»»*«**«*«*««*«**««*«*«««««#**««««» 

TST71I INC 9*8TESTN j UPDATE TEST NUMBER 



.MAIN, MACYll 27(1006) 
DFKABC , PI 1 ©3«MAY*»77 



04-MAY-77 08(13 PAGE 44 



2343 
2244 
2245 
2246 
2347 
3348 
2249 
2230 
3231 
2232 
3233 
22S4 
2255 
2256 
3237 
2258 
2239 
2260 
2361 
2262 
2263 
2264 
2365 
2266 
2267 
3368 
3269 
3370 
3371 
2272 
2273 
2274 
2275 
2276 
2277 
2278 
3279 
2280 
22S1 
23S2 
2283 
2284 
2285 
2286 
2387 
2288 
2289 
3290 
22?1 
3392 
2293 
2294 
2293 
2296 
3397 
3398 



011462 
011470 

011472 
011500 
0U304 
011506 
011512 
011514 
011520 
011522 
011526 
011530 
011534 
011336 
0H54O 
011340 
011346 
011330 



022737 
001023 

012767 

012706 
005746 
012706 
005746 
012706 
005746 
012706 
005746 
012706 
005746 
000405 

012737 
005212 

000000 



0US52 012767 
011560 005067 



011564 

011§7t> 
011376 
011600 
011604 
011612 
011616 
011622 
011624 
0U636 
011634 
011636 



011640 
011644 
011653 

011654 
011660 
011666 
011673 
011676 
011700 
011703 
011710 
011713 



08142 




T71 


TEST 


FOR FALSE OVERFLOW 


TRAP 


000071 


000304 




CMP 


#7l,g#«TESTN 


t SEQUENCE ERROR? 








BNE 


FOVER 


t BP TO ERROR HALT ON SEQ ERROR 


011540 


166304 




MOV 


#F0VEP,4 


ISET UP OVERFLOW POINTER 


001002 






MOV 


#1003, %6 










TST 


"(6) 


1 SHOULD NOT OVERFLOW 


002002 






MOV 


#3002, %6 










TST 


»(6) 


j SHOULD NOT OVERFLOW 


004002 






MOV 


#4002, %6 










TST 


"(6) 


» SHOULD NOT OVERFLOW 


010002 






MOV 


#10002, %6 










TST 


*•(«) 




020000 






MOV 


#20000, %6 


1 SHOULD NOT OVERFLOW 








TST 


"(6) 










BR 


STp 








FOVERi 








000246 


000302 




MOV 


#246,§#$FATAL 


I MOVE TO MAILBOX * ####♦#* 246 








INC 


CR2) 


JSET MSGTYP TO FATAL ERROR 








HALT 




; IT OVERFLOWED, OR WRONG 8TSTNM 












I TO SCOPE REPLACE HALT W/ 240 












1 AND REPLACE NEXT INST W/ 747 


000006 


£63224 


STP» 


MOV 


#6,4 




166222 






CLR 


6 





005237 
022737 

001013 
012706 
012767 
012746 
012746 
000003 
000240 
012737 
005212 
000000 



005237 
022737 
001023 
012706 
012767 
012746 
012746 
000002 
000340 
013737 
003212 
000000 



000304 
000072 

000500 
0U640 
000020 
011624 



I TEST 72 TEST THAT BIT 4 PSW WILL CAUSE A TRAP TO 14 

1 



000304 
166202 



TST72I 



000247 000302 



INC 
CMP 
BNE 
MOV 
MOV 
MOV 
MOV 
RTI 
NOP 
MOV 
INC 
HALT 



9#$TESTN 
#72»MITE8TN 

TST73M2 
#BUFF,SP 
ftRETAT, RTRAP4 

&20*«"(SP) 
#»+6,»(SP) 



f UPDATE TEST NUMBER 
f SEQUENCE ERROR? 
1 BR TO ERPOR HALT ON SEQ ERROR 



000304 
000073 

000500 
011714 

000020 
011700 



I SET UP TO TRAP TO 14 
fPUSH T BIT 
1 PUSH PC 
jSET T BIT 

I TRAP HERE 

I MOVE TO MAILBOX # *#«»««* 247 #*#*### 
! SET MSGTYP TO FATAL ERROR 
I TRACE BIT DID NOT TRAJPI , OR WRONG 8TESTN 
S TO SCOPE REPLACE HALt W/ 240 
I AND REPLACE NEXT INST W/ 757 

RETATS 

I TEST 73 TEST STACK POINTER DECREMENTS 



»247,S#8FATAL 
(P2) 



000304 

166136 



TST73I 



000250 000302 



INC 
CMP 
BNE 
MOV 
MOV 
MOV 
MOV 
RTI 
NOP 
MOV 
INC 
HALT 



»#8TESTN 

#73,I#$TESTN 

TST74-12 

#BUFF,SP 

#RETBT,RTRAP4 

#30,»(SP) 

*.+6,-(SP) 



#350,9«8FATAL 
(R2) 



1 UPDATE TEST NUMBER 
; SEQUENCE ERROR? 
I BR TO ERROR HALT ON SEQ ERROR 



I PUSH T BIT 
fPUSH PC 
f SET T BIT 
I trap HERE 

j MOVE TO MAILBOX i 250 
ISET MSGTYP TO FATAL ERROR 
I TRACE BIT DID NOT TRAP 1 



####### 



* 
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2399 
2300 
2301 

2302 
2303 
2304 
230S 
2306 
2307 
3301 
2309 
2310 
2311 
2313 
3313 
3314 
2313 
2316 
3317 
3318 
2319 
3330 
3331 
2332 
3323 
2324 
2323 
2326 
3337 
2329 
2329 
2330 
3331 
2332 
3333 
2334 
2333 
3336 
2337 
233S 
2339 
2340 
2341 
2342 
2343 
2344 
2345 
2346 
2347 
2348 
2349 
2350 
2331 
3332 
2333 
2354 



030627 000474 
001403 

012737 000231 

005213 



005237 
022737 
001016 
013706 
013767 
012746 
013746 
000002 

033767 
001403 
013737 
005313 
000000 



000304 
000074 

000500 
011774 

000020 
011774 



011774 
000353 



011714 
011730 
011733 
6li?30 
011733 



0U734 

011740 
0U?46 
011750 
0H7S4 
0117*3 
011766 
011773 

011774 
013003 

013004 
012012 
012014 



012016 
012022 
012030 

012032 
012036 
012040 
0120*4 
012030 
012036 
012060 
012032 
013064 
013073 
012074 



012076 003237 000304 



RETBTt 



000302 



000304 

166032 



156472 
000303 



CMP 
BEQ 
MOV 
INC 
HALT 



sp, slurry 

TST74 

#23i»i#SF&T&L 
CR2) 



TO SCOPE REPLACE HALT W/ 240 
AND REPLACE NEXT INST W/ 737 



251 



I MOVE TO MAILBOX • ######» 
I SET MSGTYP TO FATAL ERROR 

f STACK POINTER WAS NOT PUSHED BY TRAP, OR WRONG STESTN 
I TO SCOPE REPLACE HALT W/ 240 
I AND REPLACE NEXT INST W/ 747 

I TEST 74 TEST FOR PROPER PC ON STACK 



TST74I 



RETCTi 



INC 

CMP 
BNS 
MOV 
MOV 
MOV 
MOV 
RTI 

CMP 
BEQ 
MOV 
INC 
HALT 



©#$TESTN 
#74, i#$TESTN 
TST75-12 
#BUFF,SP 
#RETCT,RTRAP4 
#20»»(SP) 
# 9 *6,»(SP) 



# 8 ,BUFF*4 
TST75 

#252»l#$F&fAL 
CR23 



{UPDATE TEST NUMBER 
f SEQUENCE ERROR? 
I BR TO ERROR HALT ON SEQ ERROR 



fPUSH T BIT 
j PUSH PC 
I SET T BIT 
I TRAP HERE 



I MOVE TO MAILBOX t ##**•♦» 253 ####♦#* 
I SET MSGTYP TO FATAL ERROR 

t CORRECT PC WAS NOT SAVED ON STACK, OR WRONG ffESTN 
I TO SCOPE REPLACE HALT W/ 340 
f AND REPLACE NEXT INST N/ 754 



I TEST 75 TEST THAT RTT POPS T- BIT 



005337 


000304 




TST75 ! 


INC 


0i$TESTN 


j UPDATE TEST NUMBER 


032737 


000075 


000304 




CMP 


#75,®#$TESfN 


} SEQUENCE ERROR? 


00101S 








BNE 


TST76-12 


I BR TO ERROR HALT ON SEQ ERROR 


012706 


000500 






MOV 


#BUFF,SP 




005001 








CLR 


Rl 


ICLEAR Rl 


012746 


000020 






MOV 


#20,-(SP3 




012746 


012060 






MOV 


#RTTlr-(SP> 




012767 


012076 


IS3736 




MOV 


#RTT2,|4 




000006 








RTT 






000240 






RTTIS 


NOP 






001403 








BEQ 


TST76 




012737 


000253 


000302 




MOV 


#2S3,@#$FATAL 


I MOVE TO MAILBOX # #####*# 253 #♦#*### 


003212 








INC 


(R2) 


ISET MSGTYP TO FATAL ERROR 


000000 








HALT 




jT-BIT DID NOT TRAP, OR WRONG STESTN 



T TO SCOPE REPLACE HALT W/ 240 
t AND REPLACE NEXT INST W/ 755 

RTT2S 

I *##«#«###««®«##«##»######««#«###«#####»###»»##«#######»####»#*###*###^*##«'##*««'«»#*# 

I TEST 76 TEST THAT RTT ALLOWS ONE INST. BEFORE TRAP 

f 

T3T76S INC MSTESTN 1 UPDATE TEST NUMBER 



.MAIN, 


MACYll 


27(1006) 


04«M2Uf 


®?7 Oil 


13 PAGE 46 






DFKABC 


PU 03<*MAY«-77 


08142 




T7S 


TEST 


THAT RTT ALLOWS 


ONE INST. BEFORE TRAP SEQ 


3333 


012102 


022737 


000076 


000304 




CMP 


*76i8»$TESTN 


f SEQUENCE ERROR? 


3336 


012110 


001031 








BNE 


TST77«»12 


j BR TO ERROR HALT ON SEQ ERROR 


3337 


012112 


012705 


177777 






MOV 


#177777, %5 




2338 


012116 


012706 


000500 




HTfSs 


MOV 


#BUFF,SP 




3339 


012122 


012746 


000020 






MOV 


#20»»CSP) 




3360 


012126 


012746 


012144 






MOV 


SRTT3,»(SP3 




3361 


012132 


012767 


0121S4 


|6S6i4 




MOV 


#PTT4,14 




3362 


012140 


003001 








CLR 


Rl 


(CLEAR RO 


3363 


013142 


000006 






RTT3! 


RTT 




f SET T-BIT 


3364 


012144 


005201 






INC 


Rl 




3365 


012146 


00S203 








INC 


%5 




3366 


012130 


001762 








BEQ 


RTT5 


)D0 THIS TEST NO MORE THAN 2 TIMES 


3367 


012152 


013737 


000254 


000302 




MOV 


S254»@#SFATAL 


jMOVE TO MAILBOX » •*»«*«« 254 »#»*### 


2363 


012160 


005312 








INC 


(R2) 


f SET MSGTYP TO FATAL ERROR 


3369 


012162 


000000 








HALT 




fDlD NOT TRAP 


3370 
















f TO SCOPE REPLACE HALT W/ 240 


3371 










RTT4I 






1 AND REPLACE NEXT INST W/ 752 


3372 


012164 


005301 






DEC 


Rl 


1 SEE IF RTT ALLOWS 1 INST. 


3373 


012166 


001407 








BEQ 


RTT6 




3374 


012170 


005305 








INC 


%3 


|D0 THIS TEST NO MORE THAN TWO TIMES 


3373 


012172 


001751 








BEQ 


RTT5 




3376 


012174 


013737 


00025S 


000302 




MOV 


#2SS,S#$FATAL 


jMOVE TO MAILBOX # ###*#♦# 255 #»««### 


2377 


012202 


00S212 








INC 


CR23 


I SET MSGTYP TO FATAL ERROR 


2378 


012204 


000000 








HALT 




1 RTT DID NOT ALLOW 1 INST., OR WRONG STESTN 


3379 
















1 TO SCOPE REPLACE HALT W/ 240 


3330 










RTWi 






? AND REPLACE NEXT INST W/ 741 


2381 


012206 














3383 










t 


3383 










j TEST 


77 


TEST THAT RTI 


DOES NOT ALLOW I INST. 


3384 












3383 


012206 


005237 


000304 




TST77I 


INC 


®#STESTN 


1 UPDATE TEST NUMBER 


2386 


012212 


022737 


000077 


000304 




CMP 


#77,8#STESTN 


{SEQUENCE ERROR? 


3387 


012220 


001023 








BNE 


TST100-12 


j BR TO ERROR HALT ON SEQ ERROR 


2388 


012232 


012706 


000300 






MOV 


#BUFF,SP 




2389 


013336 


012746 


000020 






MOV 


#20, -(3P) 




3390 


013333 


012746 


012250 






MOV 


*RTI1,-(SP) 




3391 


012336 


012767 


012264 


16333© 




MOV 


#RTI2,14 




3393 


012244 


003001 








CLR 


Rl 




2393 


012246 


000002 








RTI 




)SET f»BIT 


2394 


012250 


005201 






&T!if 


INC 


Rl 


>RTI SHOULD NOT ALLOW THIS 


2393 


012232 


012737 


000256 


000302 




MOV 


#2S6»tWATAL 


1 MOVE TO MAILBOX 8 256 


3396 


012260 


005212 








INC 


CR23 


I SET MSGTYP TO FATAL ERROR 


3397 


012262 


000000 








HALT 




«T- BIT DID NOT CAUSE TRAP 


3398 
















1 TO SCOPE REPLACE HALT W/ 240 


2399 










JITS i f 






1 AND REPLACE NEXT INST W/ 756 


3400 


012264 


005701 






TST 


Rl 




3401 
















IRTI SHOULD NOT ALLOW 1 INST, SSFORS TRAP 


3403 


912266 


001405 








BEQ 


T8T100 




3403 


012270 


012737 


000257 


000302 




MOV 


#2S7#I#SFATAL 


|MOVE TO MAILBOX # **#♦•** 237 •♦#**## 


2404 


012276 


005212 








INC 


(R23 


ISET MSGTYP TO FATAL ERROR 


2403 


012300 


000000 








HALT 




IRTI DID ALLOW 1 INST. BEFURE TRAP, OR WRONG STESTN 


S406 
















t TO SCOPE REPLACE HALT W/ 240 


2407 
















1 AND REPLACE NEXT INST W/ 747 


2408 


















2409 












2410 










tfSST 


100 


DOES THE PROCESSOR TRAP WHEN %7 IS ODD I 
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DFKABC.Pil 03-MAY-77 08142 T77 TEST THAT RTI DOES NOT ALLOW 1 INST. SEQ 0047 



2411 










1 


2413 


012302 


005237 


000304 




TSTlOOi 


XNC 


0#gTESTN 


1 UPDATE TEST NUMBER 




2413 


912106 


022737 


000100 


000304 




CMP 


• lOOf MITESTN 


! SEQUENCE ERROR? 




2414 


012314 


001120 








BNE 


TST101»12 


j BP TO ERROR HALT ON SEQ ERROR 




241S 


012316 


012706 


OOOSOO 






MOV 


#BUFF,%6 


I SET UP STACK POINTER 




2416 


012322 


012767 


012346 


16S454 




MOV 


#P7TR1»4 


f RETURN FROM TRAP 




2417 


9i2f30 


012707 


000001 






MOV 


#1,%7 


rPC EQUALS ONE 




2418 


012334 


012737 


000260 


000302 




MOV 


#260,i#$FATAL 


j MOVE TO MAILBOX * **««•«* 260 


«*«**#« 


2419 


012342 


003212 








INC 


(R2) 


f SET MSGTYP TO FATAL ERROR 




2430 


012344 


000000 








HALT 




j ODD ADDRESS SHOULD HAVE TRAPPED 




2421 
















t TO SCOPE REPLACE HALT W/ 240 




2422 
















1 AND REPLACE NEXT INST W/ 763 




2423 


012346 


022767 


000001 


166120 


R7TRH 


CMP 


#1,BUFF»4 






2424 


012354 


001405 








BEG 


1$ 






2423 


012356 


012737 


000261 


000303 




MOV 


#261#M*FATAL 


jMOVE TO MAILBOX # 261 


«#*»«*« 


2426 


012364 


005212 








INC 


(R2) 


f SET MSGTYP TO FATAL ERROR 




2427 


012366 


000000 








HALT 




j CORRECT PC WAS NOT SAVED ON STACK 


2428 
















f TO SCOPE REPLACE HALT W/ 240 




2429 
















1 AMD REPLACE NEXT INST W/ 752 




2430 




















2431 


0/12370 


012706 


000500 




lit 


MOV 


#BUFF,%6 


jSTACK POINTER 




2432 


012374 


012767 


012416 


163402 




MOV 


#R7TR2#4 






2433 


012402 


00S207 








INC 


%7 


IPC BECOMES ODD 




2 4 14 


912404 








R7TR2AI 










2435 


012404 


012737 


000262 


000302 




MOV 


#262»§8IFATAL 


jMOVE TO MAILBOX S ####### 262 


*#»#*»« 


2436 


012412 


003212 








INC 


(P-2) 


jSET MSGTYP TO FATAL ERROR 




2437 


012414 


000000 








HALT 




1 




2438 
















1 TO SCOPE REPLACE HALT W/ 240 




2439 
















F AND REPLACE NEXT INST W/ 737 




2440 


012416 


022767 


012403 


166030 


R7TR2I 


CMP 


#R7TR2A+1#BUFF- 


4 




2441 


012424 


001403 








BEQ 


1$ 






2442 


012426 


012737 


000263 


000302 




MOV 


#263,9#IFATAL 


tMOVE TO MAILBOX # ####*## 263 




2443 


012434 


005212 








INC 


CR2) 


f SET MSGTYP TO FATAL ERROR 




2444 


012436 


000000 








HALT 




jCORRECT PC NOT ON STACK 




244S 
















t TO SCOPE REPLACE HALT W/ 240 




2446 
















t AND REPLACE NEXT INST W/ 726 




2447 


012440 


012706 


000500 




i$i 


MOV 


#BUFF,%6 






2448 


012444 


012767 


012466 


165332 




MOV 


#R7TR3,4 






2449 


012452 


005307 






BR601 


DEC 


%7 


I MAKE PC ODD 




2450 


012454 


012737 


000264 


000302 




MOV 


#264, *#f FATAL 


1 MOVE TO MAILBOX S 264 


«*«##*« 


24S1 


012462 


005212 








INC 


CR2) 


jSET MSGTYP TO FATAL ERROR 




24S2 


012464 


000000 








HALT 




j SHOULD TRAP 




2453 
















I TO SCOPE REPLACE HALT W/ 240 




2454 
















t AND REPLACE NEXT INST W/ 713 




2455 


012466 


022767 


012433 


166000 


R7TR3I 


CMP 


•BR60+l,BUFF-4 


I CHECK VALUE OF PC ON STACK 




2456 


012474 


001405 








BEQ 


1$ 






2437 


012476 


012737 


000265 


000302 




MOV 


«265,8#SFATAL 


jMOVE TO MAILBOX ft 263 




2458 


912504 


005212 








INC 


(P2) 


I SET MSGTYP TO FATAL ERROR 




2459 


01 2506 


000000 








HALT 




1 WRONG VALUE ON STACK 




2460 
















? TO SCOPE REPLACE HALT W/ 240 




2461 
















t AND REPLACE NEXT INST W/ 702 




2462 




















2463 


012510 


012706 


OOOSOO 




l$t 


MOV 


#BUFF,%6 






2464 


012514 


012767 


012S40 


163262 




MOV 


#P7TR4,4 






2465 


912522 


000261 








SEC 




1 CARRY EQUALS A 1 




2466 


012524 


006107 








ROL 


%7 


jPC BECOMES ODD 





.MAIN. 


MACY11 


27(1006) 


04»MAY 


•77 OBI 


13 PAGE 


48 








DFKABC 


PU 03™MAY<»77 


08142 




T100 


DOES 


THE PROCESSOR TRAP 


WHEN %7 IS ODD? 


SEO 


2467 


012526 








TR4AI 










2468 


012326 


012737 


000266 


000302 




MOV 


#266 f ffttFATAL 


f MOVE TO MAILBOX # »«**•«« 266 


#*###♦# 


2469 


012534 


005212 








INC 


(R2) 


I SET MSGTYP TO FATAL ERROR 




2470 


012536 


000000 








HALT 




1 ODD ADDRESS DIDN'T TRAP 




2471 
















1 TO SCOPE REPLACE HALT W/ 240 




2472 
















1 AND REPLACE NEXT INST W/ 666 




2473 


012340 


012767 


000006 


163236 


R7TP4I 


MOV 


#6,4 


f RESET UP A HALT FOR TRAP 




2474 


012546 


022767 


02S2SS 


165720 




CMP 


#<2*TR4A+1>,BUFF 


-4 f CHECK FOR VALUE ON STACK 




2475 


012354 


001403 








BEQ 


TST101 






2476 


012556 


012737 


000267 


000302 




MOV 


#267,M$FATAL 


IMOVE TO MAILBOX # ######* 267 


####»#♦ 


2477 


012364 


005212 








INC 


(R2) 


I SET MSGTYP TO FATAL ERROR 




2478 


012566 


000000 








HALT 




1 WRONG VALUE ON STACK, OR WRONG $TSTNM 


2479 
















I TO SCOPE REPLACE HALT W/ 240 




2480 
















t AND REPLACE NEXT INST W/ 652 




2481 












2482 










f TEST 101 


TEST TRAP ON TRAP THAT TRACE BIT TRAPS ARE INHIBITED ON TRAP INST 


2483 










1 »*«»»*«•*»•**««#***««*#«**««**»««*«»**««»«««•«**«««**«#«»««#******#»*«»*«**«*##•**•« 


2484 


012570 


005237 


000304 




TST1011 


INC 


@#gTESTN 


» UPDATE TEST NUMBER 




2483 


012574 


022737 


900101 


000304 




CMP 


#101,M«TE3TN 


j SEQUENCE ERROR? 




2486 


012602 


001027 








BNE 


BR70 


f BR TO ERROR HALT ON SEQ ERROR 




2487 




















2488 


012604 


012706 


OOOSOO 






MOV 


#BUFF,%6 






2489 


012610 


012767 


012650 


163176 




MOV 


# TRACE, 14 


j TRACE TRAP 




2490 


912616 


005027 


000016 






CLR 


#16 






2491 


012622 


003027 


000022 






CLR 


#2? 






2492 


012626 


012767 


012674 


163164 




MOV 


#TONT1,20 


flOT TRAP 




2493 


012634 


012746 


000020 






MOV 


*20»-(SP) 


f PUSH T BIT 




2494 


012640 


012746 


012646 






MOV 


# ,+6,-(SP) 


IPUSH PC 




2495 


012644 


000006 








RTT 








2496 


012646 


000004 








IOT 




jTRAP, NEW CC HAVE TRACE RESET 




2497 


012650 








TRACE! 










2498 


012650 


012737 


000270 


000302 




MOV 


#270, 9MFATAL 


1 MOVE TO MAILBOX t »***«*« 270 


######« 


2499 


012656 


005212 








INC 


(R2> 


f SET MSGTYP TO FATAL ERROR 




2500 


012660 


000000 








HALT 




1 TRACE TRAP WAS NOT INHIBITED 




2501 
















f TO SCOPE REPLACE HALT W/ 240 




2302 
















i AND REPLACE NEXT INST W/ 750 




2503 


012662 








BR70I 










2304 


012662 


012737 


000271 


000302 




MOV 


#2?1,§«FATAL 


1 MOVE TO MAILBOX # »###### 271 




2505 


012670 


005212 








INC 


(R2) 


ISET MSGTYP TO FATAL ERROR 




2506 


012672 


000000 








HALT 




» WRONG TSTNM, OR WRONG fTSTNM 




2507 
















j TO SCOPE REPLACE HALT W/ 240 




2308 
















j AND REPLACE NEXT INST W/ 743 




2509 


012$74 


012767 


000016 


165112 


TONTii 


MOV 


#16,14 






2310 


012702 


012767 


000022 


163110 




MOV 


•22,20 






2511 










1 


2512 










I TEST 102 


TEST THAT THE TRACE BIT IS SAVED IN THE STACK 




2513 










1 «■«■##•»###«■ 


2514 


012710 


005237 


000304 




TST102I 


INC 


9f tTESTN 


1 UPDATE TEST NUMBER 




2313 


012714 


022737 


000102 


000304 




CMP 


#102,8#ITESTN 


1 SEQUENCE EPROR? 




2316 


6l2?22 


001020 








BNE 


STP3 


jBP TO ERROR HALT ON SEQ ERROR 




2317 


912724 


012706 


000500 






MOV 


8BUFF,%8 


ISET UP STACK POINTER 




2518 


012730 


012767 


012734 


165056 




MOV 


•TRCl,i4 


j TRACE TRAP RETURN 




2319 


012736 


005067 


165054 






CLR 


16 






2520 


Q12742 


012746 


000020 






MOV 


#20f»(SP) 


*SET THE T BIT 




2521 


012746 


012746 


012754 






MOV 


#TRC1,-(SP) 






2322 


012752 


000002 








RTI 
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2523 


012754 


036727 


163316 


2524 


012?62 


001003 




2923 


012764 






2326 


012764 


012737 


000272 


2527 


012772 


005212 




2328 


012774 


000000 




2S29 








2530 








2531 


012776 


012767 


000016 


2932 








2533 








2934 








2535 








2336 








2537 








2338 








2339 


013004 


003237 


000304 


2340 


013010 


022737 


000103 


2941 


013016 


001063 




2342 








2943 








2344 


013020 


000402 




2343 


013022 


000000 




2946 


013024 


000000 




2347 


013026 


003000 




2341 


013030 


005067 


1647S2 


2949 


013034 


012767 


013070 


$990 


013042 


012706 


000300 


2331 


0130*6 


103720 




2932 


013050 


020027 


160000 


2953 


013QS4 


101772 




2334 


013056 






2393 


013056 


012737 


000273 


2996 


013064 


003212 




2997 


013066 


000000 




2338 








2339 








2360 








2561 


pl3070j 


010067 


177730 


2362 


^**^^ 






2963 


013074 


012700 


160001 


2964 


013100 


012767 


013136 


2963 


0131CS 


012706 


000500 


2366 


Ol3fl2 


105740 




2367 


013U4 


005200 




2368 


013116 


020067 


177702 


2569 


013122 


001426 




2570 


013124 


012737 


000274 


2571 


013132 


005212 




2372 


013134 


000000 




2573 








2974 








2373 








2376 








2877 








2878 


013133 


003767 


164634 



000020 
000302 



TRCil 



000304 



000302 



BIT 
BNE 

MOV 
INC 
HALT 



BUFF«2,#20 
3TP3D 



#272»f#8FATAL 
CR2) 



165010 8TP3DI MOV 



#16,14 



fCHECK FOR T BIT ON STACK 



I MOVE TO MAILBOX # 272 
f SET MSGTYP TO FATAL ERROR 

IT BIT NOT SAVED ON THE STACK, OR WRONG ITSTNM 
I TO SCOPE REPLACE HALT W/ 240 
T AND REPLACE NEXT INST W/ 752 



{THIS ROUTINE TEST THAT NO LEGAL ADDRESS TRAPS, 
j AND THAT AN ILLEGAL ADDRESS TRAPS TO LOCATION 4 

I TEST 103 TEST NON-EXISTENT ADDRESS TRAPS 

TST103I INC 9HTE5TN | UPDATE TEST NUMBER 

CMP #103,M«TESTN | SEQUENCE ERROR? 

BNE AUTOl f BR TO ERROR HALT ON SEQ ERROR 

I THIS ROUTINE TESTS MEMORY UNTIL IT DOES A NXM TRAP 

TSLl 
CORHf 
ADALLi 



BR 



ADALL 






CLR 


%0 




CLR 


6 




MOV 


«ATRAP,4 


I SET UP ADDRESS TRAP ENTRANCE 


MOV 


#BUFF,SP 




TSTB 


CO)* 


I IF OUTSIDE OF CORE, TRAP TO 4 


CMP 


%0, #160000 


fIS POINTER IN SIDE CORE 


BLQS 


NOR 


J TEST THE REST OF CORE 


MOV 


8273,§#$FATAL 


f MOVE TO MAILBOX # 273 


INC 


(R2) 


ISET MSGTYP TO FATAL ERROR 


HALT 




1 SHOULD HAVE TPAPED 






t TO SCOPE REPLACE HALT W/ 240 






1 AND REPLACE NEXT INST W/ 733 


HERE 


ON AN ADDRESS TRAP 




MOV 


RO.CORH 


»MOVE THE FIRST NXM LOCATION IN CORK 



ATRAPt 

I THIS ROUTINE DOES NXM TRAPS UNTIL IT FINDS AN EXISTANT MEMORY LOCATION 



MOV 

164676 CTRAPl MOV 

MOV 
TSTB 
DTRAPt INC 
CMP 
BEQ 

000302 MOV 
INC 
HALT 



BTRAPl TST 



#160001, RO 
#BTRAP,4 
#BUFF,5P 
»CRO) 
RO 

R0»CORH 

TRAPB 

#274,8#SFATAL 
CR23 



) SET UP THE HIGHEST MEM LOCATION 
I SET UP THE VECTOR 

I DOES IT EXIST? 

jIF YES INCREMENT IT 

?IS IT THE SAME LOCATION? 

I MOVE TO MAILBOX I 274 
I SET MSGTYP TO FATAL ERROR 

f CONTENTS OF RO AND CORH SHOULD HAVE BEEN EQUAL 

I TO SCOPE REPLACE HALT W/ 240 

I AND REPLACE NEXT INST W/ 730 

fIF THIS COMPARISON FAILS IT MEANS 

j THAT SOME LEGAL ADDRESS TRAPPED OR 

I THAT AN ILLEGAL ADDRE88 DID NOT TRAP 



• MAIN, MACYU 27(1006) 04-MAY-77 08H3 PAGE 50 
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2379 
2380 
2381 
2382 
2383 
2384 
2383 
2383 
2587 
2588 
2319 
2390 
2391 
2392 
2393 
2594 
2393 
2596 
2597 
2398 
2399 
2600 
2601 
2602 
2603 
2604 
2605 
2606 
2607 
2608 
2609 
2610 
2611 
2612 
2613 
2614 
2613 
2616 
2617 
2618 
2619 
2620 
2621 
2622 
2623 
2624 
2623 
2626 
2627 
2&2® 
2629 
2630 
2631 
2632 
2633 
2634 



013142 
013144 
013152 
013154 



013156 

013164 
013166 
013166 
013174 

013176 



013200 
013206 



013212 
013216 
013222 
013230 
013234 
013236 
013240 
013244 



001403 
012737 
005212 

000000 



026727 
001745 

012737 

003212 
000000 



012767 
005067 



003067 
012706 
012767 
005767 
000403 
000000 
005267 
012767 



000275 000302 



165312 
000276 



000006 

164374 



000020 

000300 
013240 
164330 



177772 
000006 



013114 
000302 



164576 TRAPBi 



BEQ 
MOV 
INC 
HALT 



CMP 
BEQ 

MOV 
INC 
HALT 



MOV 
CLR 



1$ 

#275,I#$FATAL 
CR2) 



BUFF«*4, #DTRAP 
CTRAP 



#276,0#$FATAL 

CR23 



#6, 
6 



f MOVE TO MAILBOX # 275 
I SET MSGTYP TO FATAL ERROR 
I NEW PSW SHOULD HAVE BEEN ZERO 
I TO SCOPE REPLACE HALT W/ 240 
f AND REPLACE NEXT INST W/ 720 



I MOVE TO MAILBOX # »««««»# 276 »*»*»*» 

I SET MSGTYP TO FATAL ERROR 

I OLD PC WAS NOT SAVED OR WRONG STESTN 

I TO SCOPE REPLACE HALT W/ 240 

t AND REPLACE NEXT INST W/ 707 



f THIS ROUTINE WILL FIGURE OUT IF YOU HAVE A DL11W 



164534 



164532 



CLR 
MOV 
MOV 
TST 

BR 

PROFTEi 000000 
DLllWf INC 
DLllWli MOV 



PROFTE 

#BUFF,SP 

#DL11W,4 

TPs 

DL11W1 

PROFTE 

#6,4 



j SET UP THE STACK POINTER 

i SET UP THE TRAP VECTOR 

I TEST THE PUNCH STATUS REGISTER 

I BRANCH IF IT EXISTS 

1 1NCREMENT IF NO DLllW 



013252 


005237 


000304 




T8T104I 


INC 


013236 


022737 


000104 


000304 




CMP 


013264 


001031 








BNE 


013266 


005767 


177744 






TST 


013272 


001042 








BNE 


013274 


000003 








RESET 


Q132?6 


012767 


000340 


164472 




MOV 


013304 


012706 


000400 






MOV 


013310 


012767 


013362 


164466 




MOV 


013316 


012767 


013350 


164540 




MOV 


013324 


012767 


000100 


164232 




MOV 


013332 


005067 


164440 






CLR 


013336 


012737 


000277 


000302 




MOV 


013344 


005212 








INC 


013346 


000000 








HALT 


013350 








TDEC81 




013350 


012737 


000300 


000302 




MOV 


013336 


005212 








INC 


013360 


0QGOOO 








HALT 


013362 


005067 


164176 




TDEC77I 


CLR 


013366 


012767 


000006 


1644i0 




MOV 


013374 


005067 


164406 






CLR 



I TEST 104 TEST THAT A TTY INTERRUPT CAUSES AN OVERFLOW TRAP 



§#|TESTN 
*1O4,0«$TESTN 
TDEC8 
PROFTE 
R7TRX 

#340, STATUS 

#400, %6 

#TDEC77,4 

•TDEC8,64 

#100,TTCSP 

STATUS 

#277,§#SFATAL 
(R2) 



#300,§W&TAL 
CR2) 



TTCSR 

#6,4 



I UPDATE TEST NUMBER 
; SEQUENCE ERROR? 
I BR TO ERROR HALT ON SEQ ERROR 



I LOCK OUT INTERRUPT 

I SET UP STACK TO OVERFLOW 

I SET UP OVERFLOW TRAP 

I SET UP INTERRUPT VECTOR 

I SET INTERRUPT ENABLE 

I ALLOW INTERRUPT TO OCCUR 

I MOVE TO MAILBOX $ 277 

I SET MSGTYP TO FATAL ERROR 

I NO INTERRUPT OCCURRED 

I TO SCOPE REPLACE HALT W/ 240 

f AND REPLACE NEXT INST W/ 746 

I MOVE TO MAILBOX » ####### 300 »##♦#•# 
t SET MSGTYP TO FATAL ERROR 

I OVERFLOW TRAP DID NOT OCCUR OR WRONG »TSTNM 
I TO SCOPE REPLACE HALT W/ 240 
1 AND REPLACE NEXT INST W/ 741 
f CLEAR INTERRUPT ENABLE 



.MAIN. MACY11 27(1006) 04-MAY-77 08113 PAGE SI 



FKABC s Pli 03»MAY»7? 


8142 




T104 TEST 


THAT A TTY INTERRUPT CAUSES AN OVERFLOW TRAP SEQ 


2335 


013400 








R?TPX| 






2636 












2637 










1 TEST 105 


TEST THAT A PENDING INTERRUPT OCCURS BEFORE TRAP 


2638 












2639 


013400 


005237 


SOU 




TSTlOSt INC 


M$TESTN 


j UPDATE TEST NUMBER 


2640 


013404 


022737 


AAA i AK 


AAA1AA 


CMP 


#105, 9#$TESTN 


1 SEQUENCE ERROR? 


2641 


013412 


001037 






BNE 


BR71 


jBR TO ERROR HALT ON SEQ ERROR 


2642 


013414 


005767 


177616 




TST 


PROFTE 




2643 


013420 


001046 






BNE 


NODL 




2644 


013422 


012706 


000300 




MOV 


#BUFF # %6 




2645 


013426 


012767 


AAAlifl 
UUv jvv 




MOV 


#340, STATUS 


j SET TO A HIGH PRIORITY LEVEL 


2646 


013434 


012767 




164422 


MOV 


#TR0,64 




2647 


013442 


012767 


nnn 1 on 


1641 14 


MOV 


# 100,TTCSP 


f INTERRUPT FOR TTY PUNCH/PRINTEP 


2648 


0|345o 


012767 


013512 




MOV 


#BP7l,34 


j TRAP VECTOR 


2649 


013436 


012767 




* ? .Vi. 


MOV 


*TR2,64 


1 TTY VECTOR 


2650 


Of 3464 


012767 


nnn* Aft 


1 043^4 


MOV 


«340,36 


1 1F TRAP TRAPS, MOVE 340 TO PRIORITY 


2651 


013472 


005067 


164300 




CLP 


STATUS 


I SHOULD INTERRUPT AT END OF CLR INST 


2652 


013476 


104400 






TRAP 




» TTY INTERRUPT SHOULD OVERRIDE TRAP 


2653 


013500 








TROl 






2654 


6l3|00 


012737 


AAA Jl\l 

OUU3U1 


A A A % A") 


MOV 


#301,?#8FATAL 


> MOVE TO MAILBOX S *#*#### 301 *###*«# 


2635 


013506 


005212 






INC 


(R2) 


t SET MSGTYP TO FATAL ERROR 


2696 


013510 


000000 






HALT 




1 TTY SHOULDN'T HAVE INTERRUPTED 


2657 














t TO SCOPE REPLACE HALT W/ 240 


2658 














t AND REPLACE NEXT INST W/ 740 


2659 


013512 








BR71I 






2660 


013512 


012737 


UUUJvi 


AAAIA) 


MOV 


#302,8#8FATAL 


I MOVE TO MAILBOX # 302 


2661 


013520 


005212 






INC 


CR23 


1 SET MSGTYP TO FATAL ERROR 


2662 


013522 


000000 






HALT 




j TRAP OCCURRED FIRST, OR WRONG 8TSTNM 


2663 














t TO SCOPE REPLACE HALT W/ 240 


2664 














1 AND REPLACE NEXT INST W/ 733 


2665 


013524 


00506? 


164306 




TR21 CLP 


36 




2666 


013530 


042767 


aaa mn 


1 &&n2& 


BIC 


#100,TTCSP 




2667 


013536 








NODLt 






2668 










I ###*##### ♦♦♦####**###*####*##«##»#**####*##*##*#*##«####^ 


2669 










» TEST 106 


TEST THAT A PENDING INTERRUPT, INTERRUPTS BETWEEN TRAPS 


2670 










! 


2671 


013536 


005237 


A A A? A A 




TST106I INC 


?#$TESTN 


t UPDATE TEST NUMBER 


2672 


013542 


022737 


AAA I Aft 


000304 


CMP 


#106,i#$TESTN 


j SEQUENCE ERROR? 


2673 


013550 


001031 






BNE 


TPS 


j BP TO ERPOP HALT 0" SEQ ERROR 


2674 


013552 


005767 


177460 




TST 


PROFTE 




2675 


013556 


001046 






BNE 


NODL1 




2676 


013560 


012706 


A A AS A A 




MOV 


SBUFF,%6 




2677 


013564 


012767 






MOV 


#340, STATUS 




2678 


013572 


012787 


AAA 1 A A 

000 1 00 




MOV 


(MOCTTCSP 




2679 


01 3600 


012767 






MOV 


#TP3,34 


1 TRAP 


2680 


013606 


012767 




1 A495n 


MOV 


«TP4,64 


j TTY OUTPUT 


2681 


013614 


012767 


013634 


164176 


MOV 


STP5,20 


tlOT 


2682 


013622 


012767 


AAAllA 


164172 


MOV 


#340,22 


SlOT PRIORITY 


2683 


013630 


104400 






TRAP 




j THE ACT OF TRAPPING LOWER PRIORITY 


2684 


013632 


000004 






TR3l I0T 




? INTERRUPT SHOULD OCCUR IN PLACE OF I0T TRAP 


2685 


013634 








TR5 I 






2686 


013634 


012737 


000303 


000302 


MOV 


#303,B«SFATAL 


•, MOVE TO MAILBOX * #*#*### 303 ###*#*# 


2687 


013642 


005212 






INC 


(P2) 


t SET MSGTYP TO FATAL ERROR 


2688 


013644 


000000 






HALT 




»NO INTFPPUPT BETWEFN TRAPS , OP WRONG STSTNM 


2689 














t TO SCOPE REPLACE HALT W/ 240 


2690 














1 AND REPLACE NEXT TNST W/ 741 
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MACY11 


27(1006) 


04«MAY«*77 08113 PAGE 


52 






DFKABC , 


,Plt 1 


33*MAY-77 


08142 




T106 


TEST ' 


THAT A PENDING INTERRUPT, INTERRUPTS BETWEEN TRAPS SEQ 


2691 


013646 


005067 


164150 




TR4I 


CLR 


22 


fCLP IOT PRIORITY 


2692 


013652 


012767 


000036 


164154 




MOV 


#36,34 




2693 


013660 


012767 


000066 


164176 




MOV 


#66,64 




2694 


013666 


012767 


000022 


164124 




MOV 


#22,20 




2695 


013674 








N0DL11 








2696 


















2697 










1 ■ft^^w^^ft********* 


2698 










I TEST 107 


TEST THAT "RESE1 


'» GOES TO OUTSIDE WORLD 


2699 










t 


3700 


013674 


005237 


000304 




TST107I 


INC 


(8*8TESTN 


; UPDATE TEST NUMBER 


2701 


013700 


022737 


000107 


000304 




CMp 


#l07,g#8TESTN 


; SEQUENCE EPPOR? 


2702 


013706 


001027 








BNE 


TSTHO-12 


; BR TO ERROR HALT OH SEQ ERROR 


2703 


013710 


005767 


177322 






TST 


PROFTE 




2704 


013714 


001031 








BNE 


NODL2 




2705 


013716 


012767 


000100 


183640 




MOV 


#100»TTCSR 


?SET INTERRUPT ENABLE 


2?06 


013724 


012767 


000100 


163626 




MOV 


#100,TPCSP 


ISET INTERRUPT ENABLE 


2707 


013732 


000005 








RESET 




» SHOULD CLEAR INTERRUPT ENABLE 


2708 


013734 


032767 


000100 


163622 




BIT 


»100,TTCSP 


! TEST FOP CLEAR 


2709 


013742 


001405 








BEQ 


18 




2710 


013744 


012737 


000304 


000302 




MOV 


«304,et$FATAL 


*M0VE TO MAILBOX # ####### 304 


2711 


013752 


005212 








INC 


(R23 


j SET MSGTYP TO FATAL ERROR 


2712 


013754 


000000 








HALT 




; RESET FAILED TO CLEAR TTCSP 


2713 
















t TO SCOPE REPLACE HALT W/ 240 


2714 
















j AND REPLACE NEXT INST W/ 754 


2715 


013756 


032767 


000100 


163574 




BIT 


#100,TPCSR 


> TEST FOR CLEAR 


2716 


013764 


001405 








BEQ 


TST110 




2717 


013766 


012737 


000305 


000302 




MOV 


#305,3#®FATAL 


f MOVE TO MAILBOX * *««*««* 305 *«*#*«* 


2718 


013774 


005212 








INC 


(R2l 


f SET MSGTYP TO FATAL ERROR 


2719 


013776 


000000 








HALT 




j RESET FAILED TO CLEAR TRCSR,OR WRONG STSTNM 


2720 
















f TO SCOPE REPLACE HALT W/ 240 


2721 
















t AND PEPLACE NEXT TNST W/ 743 


2722 


014000 








N0DL2I 








2723 












2724 










f TEST 110 


TEST THAT RESET 


HAS NO EFFECT ON THE TRACE TRAP 


2725 












2726 


014000 


00523? 


000304 




TSTilOi 


INC 


9#«TESTM 


j UPDATE TEST NUMBER 


2727 


014004 


022737 


000110 


000304 




CMP 


#1 10,MSTESTN 


: SEQUENCE ERROR? 


2728 


014012 


001014 








BNE 


PESET3 


* BR TO ERROR HALT ON SEQ ERROR 


2729 


014014 


012706 


000500 






MOV 


#BUFF,%6 


; SET STACK 


2730 


014020 


012767 


014056 


163766 




MOV 


#RESET2,14 


SSET UP TRACE VECTOR 


2731 


014026 


012746 


000020 






MOV 


»20,-(P6) 


I SET THE T-BIT ON STACK 


2732 


014032 


012746 


014040 






MOV 


#18,«(R8) 


j MOVE NEW PC ON STACK 


2733 


014036 


000006 








RTT 






2734 


014040 


000005 






i$t 


RESET 




I SHOULD HAVE NO EFFECT 


2735 


014042 


00000s 








RESET 




jNO EFFECT 


2736 


014044 








RESET3 t 








273? 


014044 


012737 


000306 


000302 




MOV 


#306,8*8FATAL 


1 MOVE TO MAILBOX # 306 ####### 


2738 


014052 


005212 








INC 


(R2) 


f SET MSGTYP TO FATAL ERROR 


2739 


0U054 


000000 








HALT 




j TRACE TRAP FAILED, OP WRONG $TSTNM 


2740 
















I TO SCOPE REPLACE HALT W/ 240 


2741 
















1 AND REPLACE NEXT INST W/ 756 


2742 


014056 


005067 


163714 




RESET2I 


CLR 


STATUS 


* CLEAR TRACK 


2743 


014062 


005067 


163730 






CLP 


16 


I TRACE STATUS 


2744 


014066 


012767 


000016 


163720 




MOV 


#16,14 




2745 


















2746 













.MAIN. H&CYil 27(1006) 04-MAY-77 08113 PAGE S3 

DPKABC.PU 03-MAY-77 08|43 TtlO TEST THAT RESET HAS NO EFFECT ON THE TRACE TRAP 



SEQ 00S3 



2747 










t TEST 111 


TEST THAT WHEN 


TTY INTERRUPTS IT POPS NEW STATUS 


2748 












2749 


014074 


005237 


000304 




TSTUll INC 


S#«TESTN 


I UPDATE TEST NUMBER 


27S0 


014100 


022737 


000111 


000304 


CMP 


#lll,##8fESTN 


1 SEQUENCE ERROR? 


27S1 


014106 


001051 






BNE 


TTYll 


I BR TO ERROR HALT ON SEQ ERROR 


2752 


014110 


005767 


177122 




TST 


PROFTE 




2753 


014| 14 


001055 






BNE 


N0DL3 




27S4 


014116 


000005 






RESET 






2755 


014120 


012706 


000500 




MOV 


#BUFF,%6 


fSET UP STACK 


2756 


0l4|24 


012767 


014150 


163732 


MOV 


*TTY3r64 


I INTERRUPT VECTOR 


2757 


014J32 


005067 


163640 




CLR 


STATUS 


f DROP PROCESSOR PRIORITY 


2758 


014136 


012767 


000357 


163722 


MOV 


#357,66 


I HIGH PRIORITY ON INTERRUPT 


2759 


014144 


005167 


163414 




COM 


TTCSR 


> SHOULD SET INTERRUPT ENABLE £ INTERRUPT 


2760 


014|50 


026727 


163622 


000357 


TTY3I CMP 


STATUS, #357 




276! 


014156 


001405 






BEQ 


13 




2762 


014160 


012737 


000307 


000302 


MOV 


#307,M$FATAL 


j MOVE TO MAILBOX • ####♦*# 307 #####*# 


2763 


01 4 $66 


005212 






INC 


(R2) 


j SET MSGTYP TO FATAL ERROR 


2764 


014170 


000000 






HALT 




1 INTERRUPT DID NOT POP CORRECT STATUS 


2765 














t TO SCOPE REPLACE HALT W/ 240 


2766 














f AND REPLACE NEXT INST W/ 746 


2767 


- 

014172 


000003 






111 RESET 




tCLR NTERRUPT ENABLE 


2768 


014174 


012706 


000500 




MOV 


#BUFF,%6 


1 STACK SET UP 


2769 


014200 


1 2767 


014224 


IB J030 


MOV 


#TTY4,64 


f INTERRUPT VECTOR 


2770 


014206 


005067 


163654 




CLR 


66 


|CL* NEW STATUS 


2771 


014212 


012767 


000157 


163356 


MOV 


#157, STATUS 


f PROCESSOR STATUS 


2772 


014220 


005167 


163340 




COM 


TTCSR 


I SET INTERRUPT ENABLE 


2773 


014224 


005767 


163546 




TTY4I TST 


STATUS 




2774 


014230 


001405 






BEQ 


TTT37 




2775 


014232 








TTYlli 






2776 


01 4232 


012737 


AAAf £ ft 

000410 


000302 


MOV 


#310, S#f FATAL 


1 MOVE TO MAILBOX S 310 ####### 


2777 


014240 


005212 






INC 


€R25 


f SET MSGTYP TO FATAL ERROR 


2778 


014242 


000000 






HALT 




t INCORRECT STATUS, OR WRONG 8TSTNM 


2779 














1 TO SCOPE REPLACE HALT W/ 240 


2780 


- 












! AND REPLACE NEXT INST W/ 721 


2781 


014244 


005067 


163314 




TTT37I CLR 


TTCSR 




2782 


014250 








NODL3I 






2783 
















2784 












2785 










I TEST 112 


TEST THE 'WAIT' 


INSTRUCTION 


2786 










f #»#«###»######«**####«*##^#*###*####«#####«####*##*#####«#*«»'»**«^«-####«'#####«'««#*#«' 


2787 


014250 


005237 


000304 




TST1121 INC 


f #|TESTN 


j UPDATE TEST NUMBER 


2781 


014254 


022737 


0001 12 


000304 


CMP 


#U2,M$TESTN 


1 SEQUENCE ERROR? 


2789 


014262 


001055 






BNE 


STP4 


» BR TO ERROR HALT ON SEQ ERROR 


2790 


01 4264 


042767 


ftft ft * Aft 

000100 


163272 


BIC 


#100, TPS 


f CLEAR INTERRUPT ENABLE 


2791 


01 4272 


01 2706 


ft ft AS ft ft 

000300 




MOV 


#BUFF,SP 


1 SET UP THE STACK 


2792 


014276 


012767 


014366 


163560 


MOV 


«WATE,64 


f SET UP THE INTERRUPT VECTOR 


2793 


014304 


005067 


163556 




CLR 


66 




2794 


014310 


105767 


163250 




WATE1I TSTB 


TPS 


{WAIT FOR READY 


2795 


014314 


100375 






BPL 


WATE1 


|TQ BE UP 


2796 


014316 


012767 


000013 


163242 


MOV 


#15,TPB 


{DO A CARRIAGE RETURN 


2797 


014324 


105767 


163234 




HATE2 1 TSTB 


TPS 


1WAIT FOR READY TO COME UP 


2798 


014330 


100375 






BPL 


WATE2 




2799 


014332 


012767 


000015 


163226 


MOV 


#15,TPB 


{DO ANOTHER CARRIAGE RETURN 


2800 


014340 


052767 


000100 


163216 


BIS 


#100, TPS 


fSET THE INTERRUPT ENABLE 


2801 


014346 


005067 


163424 




CLR 


STATUS 


{CLEAR THE PSW 


2802 


014352 


000001 






WATE3 i WAIT 




{WAIT FOR THE INTERRUPT 



„MAIN 9 . 


MACY11 


27(1006) 


04-»M&Y 


«ii oa 


f 13 PAGE 


54 






DFKABC, 


Pll 03-MAY-77 


08142 




T112 


TEST 


THE 'WAIT* INSTRUCTION 


2803 


014354 


012737 


000311 


000302 




MOV 


»3U,**$FATAL 


fMOVE TO MAILBOX # 311 


2804 


014362 


005212 








INC 


(P2) 


1 SET MSGTYP TO FATAL ERROR 


2805 


014364 


000000 








HALT 




{WAIT INSTRUCTION DID NOT LOOP 


2806 
















» TO SCOPE REPLACE HALT W/ 240 


2807 










MATES 






% AND REPLACE NEXT INST W/ 736 


2808 


014366 


005767 


163404 




TST 


STATUS |IS THE 


PSW CORRECT? 


2809 


014372 


001405 








BEQ 


1« 




2810 


014374 


012737 


000312 


000302 




MOV 


#312,9#SFATAL 


I MOVE TO MAILBOX » ***«»«« 312 *##»##* 


2811 


014402 


005212 








INC 


(R2) 


iSET MSGTYP TO FATAL ERROR 


2812 


014404 


000000 








HALT 




I NEW PSW SHOULD HAVE BEEN ZERO 


2813 
















% TO SCOPE REPLACE HALT W/ 240 


2814 
















I AND REPLACE NEXT INST W/ 726 


2815 


014406 


026727 


164062 


014354 


%%'% 


CMP 


BUFF-4,#WATE3+2 


lIS THE OLD PC SAVED 


2816 


01*414 


001405 








BEQ 


STP4E 




2817 


014416 








STP4S 








2818 


014416 


012737 


000313 


000302 




MOV 


*3l3,i*$FATAL 


I MOVE TO MAILBOX # *#«##*« 313 #»*##*# 


2819 


014424 


005212 








INC 


(R25 


I SET MSGTYP TO FATAL ERROR 


3820 


014426 


000000 








HALT 




5 OLD PC WAS NOT SAVED OR WRONG $TESTN 


2821 
















1 TO SCOPE REPLACE HALT W/ 240 


2823 
















1 AND REPLACE NEXT INST W/ 715 


2823 


014430 


012767 


000066 


163426 


STP4ES 


MOV 


#66,64 




2824 


















2825 


014436 


004767 


001350 






JSR 


%7,CLRALL 


ICLEAR ALL KTll-D REGISTERS 


2826 


014442 


012777 


077406 


164106 




MOV 


#77406, 8KPDR0 


f MAP KERNEL TO BANK 0, RW, 4K 


2827 


014450 


004767 


001424 






JSR 


PCKERN7 


|MAP KERNEL PAR/PDR 7 TO EXT BANK 


2828 


014454 


012777 


014510 


164030 




MOV 


#INT25,*KTVEC 


I SETUP RETURN VECTOR 


2829 


014462 


005077 


164026 






CLR 


fKTSTA 




2830 


014466 


012704 


020000 






MOV 


#20000»R4 


I USE R4 TO REFERENCE NR KERNEL 1 


2831 


014472 


005277 


164004 






INC 


9SR0 


1 TURN ON KTU-D 


2832 


014476 


005724 






ADR25I 


TST 


(P4) + 


I REFERENCE NR KERNEL 1 


2833 


6l4§00 


000000 






ADR25A1 


HALT 




{SHOULD HAVE ABORTED ALREADY 


2834 


014502 


005077 


163774 






CLR 


ISRO 


{TURN OFF KT11«D 


2835 


014506 


000442 








BR 


DON25 




2836 


014510 


017701 


163766 




INT25I 


MOV 


9SR0,R1 


ISAVE CONTENTS OF SRO 


2837 


014514 


005377 


163762 






DEC 


9SR0 


I TURN OFF KTU-D 


2838 


014520 


022701 


100003 






CMP 


1100003, Rl 


{CHECK SAVED CONTENTS OF SRO 


2839 


014524 


001401 








BEQ 


«*4 




2840 


014526 


000000 








HLT 




I SRO INCORRECT AFTER NR ABORT 


2841 
















{ (SEE SAVED CONTENTS IN Rl) 


2842 


014530 


022777 


014476 


163752 




CMP 


#ADR25,?SR2 


|CK SR2 


3843 


014536 


001401 








BEQ 


**4 




2844 


014540 


000000 








HLT 




|SR2 INCORRECT-SHOULD CONTAIN ADDRESS 


2845 
















{OF LAST FETCH BEFORE THE ABORT 


2846 


014542 


005077 


163742 






CLR 


9SR2 


{TRY TO WRITE INTO SR2 


2847 


014546 


022777 


014476 


163734 




CMP 


#ADR25,#SR2 


|SR2 SHOULD BE READ ONLY 


2848 


014554 


001401 








BEQ 


8 + 4 




2849 


014556 


000000 








HLT 




|SR2 NOT READ ONLY 


2850 


014580 


022777 


077506 


163770 




CMP 


177506, 3KPDP0 




2851 


014386 


001401 








BEQ 


s *4 




2853 


014570 


000000 








HLT 




{KERNEL PDR INCORRECT 


2833 
















|W BIT SHOULD HAVE BEEN SET BY THE STACK 


2854 


014572 


005777 


163762 






TST 


IKpDRl 




2855 


014576 


001401 








BEQ 


B *4 




2856 


014600 


000000 








HLT 




I KERNEL PDR 1 INCORRECT 


2857 


014602 


021627 


014500 






CMP 


(R6),#ADR25A 


{CHECK VALUE PUSHED ON STACK 


2851 


014606 


001401 








BEQ 


s *4 





'.MAIN, MACYll 27(1006) 04-MAY-77 08113 PAGE 55 

DFKABC.P1 1 03-MAY-77 08142 T112 TEST THE 'WAIT' INSTRUCTION 



SEQ 0059 



9S3f 


014610 


000000 








HLT 




2880 


014613 


022626 








CMP 


(R6)*#(R6)* 


3§§& 


014614 


003077 


163674 




00N25i 


CLR 


8KTSTA 


2812 


014630 


016777 


163670 


163664 




MOV 


KT8TA, 8KTVEC 


3833 
















2884 
















2863 
















38SS 


014626 


004767 


001204 






JSR 


%7,RWALL 


2867 


914633 


012777 


000004 


163720 




MOV 


#4, IKPDR1 


3868 


014340 


004767 


001234 






JSR 


PC f KERN7 


386f 


014644 


012777 


014670 


163640 




MOV 


#RET33, SKTVEC 


38?0 


014652 


003077 


163636 






CLR 


ffCTSTA 


2671 


014656 


005277 


163620 






INC 


ISRO 


2tff 


014663 


005737 


030000 






TST 


§$30000 


2873 


014666 


000000 








HALT 




2674 


014670 


022777 


140003 


163604 


RET33I 


CMP 


#140003* »8R0 


3875 


014$76 


001401 








BEQ 


9*4 


2876 


014700 


000000 








HLT 




3877 
















3678 


Q14702 


005077 


163374 






CLR 


fSRO 


3879 


014706 


016777 


163602 


163576 




MOV 


KTSTA,fKTVEC 


3880 
















3881 
















3883 


014714 


004767 


001072 






JSR 


%7 f CLRALL 


3883 


014720 


004767 


001154 






JSR 


PC# KERN7 


3684 


614724 


012777 


077406 


163634 




MOV 


#77406, iKPDRO 


3883 


014732 


012777 


077402 


163620 




MOV 


#77403, 6KPDR1 


3686 


014740 


012777 


014774 


163344 




MOV 


#INT40,6KTVEC 


3687 


014746 


005077 


163542 






CLR 


9KTSTA 


3898 


014752 


005277 


163534 






INC 


fSRO 


3889 


014736 


013737 


037776 


037776 


ADR40t 


MOV 


M37776#M37776 


3890 


014764 


003077 


163312 






CLR 


@SRO 


3891 


014770 


000000 








HLT 




nn 


014772 


000510 








BR 


D0NE40 


3893 


014774 


042777 


000001 


163300 


INT401 


BIC 


#1,#SR0 


3894 


015002 


022777 


020002 


163472 




CMP 


#30002, 9SR0 


3195 


013010 


001401 








BEQ 


9*4 


3896 


Q15012 


000000 








HLT 




3897 


913014 


012777 


015050 


163470 




MOV 


#INT40A,6KTVEC 


3896 


015022 


022626 








CMP 


(R6)+#(R6)+ 


3699 


013034 


012702 


037776 






MOV 


#37776, R2 


3900 


015030 


032777 


000001 


163444 




BIS 


#1,SSR0 


3901 


015936 


012242 








MOV 


(R2)+#-(R2) 


3903 


015040 


005077 


163436 




ADR40AI 


CLR 


§SRQ 


3901 


013044 


000000 








HLT 




3904 


013046 


000462 






INT40AI 


BR 


DONE40 


3903 


015050 


042777 


000001 


163424 


BIC 


Sl,iSR0 


3906 


915036 


022777 


020002 


163416 




CMP 


#20002, @SRO 


3907 


015064 


001401 








BEQ 


.♦4 


3909 


015066 


000000 








HLT 




3909 


013070 


022777 


014736 


163412 




CMP 


#ADR40,$SR2 


3910 


915076 


001401 








BEQ 


a*4 


3911 


013100 


000000 








HLT 




3912 


013102 


031627 


015040 






CMP 


(R6),#ADP40A 


3913 


015106 


001401 








BEQ 


«*4 


3914 


015110 


000000 








HLT 





» INCORRECT VALUE ON STACK 
j RESTORE STACK 

iCHANGE TRAP VECTOR TO CAUSE A 
I HALT ON A FALSE TRAP 



|MAP ALL PAGES RW , 4K, BANK 

I MAP KERNEL 1 NR, 1 PAGE 

I MAP KERNEL PAR/PDR 7 TO EXT BANK 

1 SETUP ABORT RETURN 



I TURN ON KTll-D 
fREFERENCE NR KERNEL 
I NO NR ABORT 
I CHECK 8R0 



1 - SHOULD ABORT 



fSRO INCORRECT - SHOULD SHOW KERNEL 
f PAGE 1, AND BOTH NR ♦ PL ERRORS SET 



f RESTORE TRAP CATCHER 



f CLEAR ALL KTll-D REGISTERS 

I MAP KERNEL PAR/PDR 7 TO EXT BANK 

f MAP KERNEL RW,PK,BANKO 

I MAP KERNEL 1 NAM, KSZ K, BANKO 

I SETUP RETURN VECTOR 

I TURN ON KTU-D 

I REFERENCE KERNEL 1 ® 1ST ABORT 

f TURN OFF KT11-D 

} REFERENCE TO KERNEL 1 

j DIDN'T ABORT 

I TURN OFF KTll-D 

f CHECK SRO 

|SRO INCORRECT AFTER NAM ABORT 

I SETUP NEW RETURN VECTOR 

f RESTORE STACK POINTER 

I SETUP R2 TO REFERENCE KERNEL 1 

I TURN ON KTU-D 

I REFERENCE KERNEL 1 -2ND ABORT 
I TURN OFF KTU-D 

1 2ND REFERENCE TO KERNEL 1 

f DIDN'T ABORT 
I TURN OFF KTH-D 

f CHECK SRO 

f SRO INCORRECT AFTER 2ND NAM ABORT 
f CHECK SR2 

jSR2 DOESN'T CONTAIN VALUE FROM 1ST ABORT 
fCHECK ADDRESS PUSHED ON STACK 

I INCORRECT ADDRESS ON STACK 



.MAIN. MACYil 27(1006) 04-MAY-77 08113 PAGE 56 

DFKABC.P1 1 03-MAY-77 08i42 T112 TEST THE 'WAIT* INSTRUCTION 



SEQ 0056 



3fti 
3f 17 
2918 
3919 
2920 
2921 
9932 
2#f3 
2934 
3933 
2926 
2937 
3938 
3929 
3930 
3931 
3932 
3933 
2934 
3933 
2936 
2937 
293® 
iWf 
2940 
3941 
2942 
3943 
2944 
2943 
2946 
2947 
294S 
2949 
2950 
2951 
2933 
2933 
2934 
2935 
2936 
3937 
293S 
2939 
2960 
2961 
2963 
2963 
3964 
3963 
3966 
2967 
3968 
3969 
2970 



015112 
015114 
015122 

013136 
013132 
013136 
015140 
6l3f44 
013146 
Oi3|30 
013156 
915164 
015166 
6l3j7o 
013176 
015200 

WSW2 
013206 
013210 
015212 
013214 
913230 
013224 



015232 

015238 
013244 
013246 
915234 
015262 
913270 
015276 
013300 
015302 
015302 
015310 
013312 
015312 
015314 

013316 
913116 
015324 
013332 
013336 
913340 
913342 
013346 
915330 
015354 
015360 



022626 








CMP 


(R6)+#(R6)+ 


1 RESTORE STACK POINTER 


012777 


015150 


163370 




MOV 


#INT40B,gKTVEC 


f CHANGE RETURN ADDRESS 


003077 


163334 






CLR 


3SP0 


fCLEAR NAM ERROR BIT-8H0ULD 














1 "UNLOCK" ERROR TRACKING 


012702 


037776 






MOV 


#37776, R2 


1 SETUP R2 TO REFERENCE KERNEL 1 


005277 


163344 






INC 


®SRO 


f TURN ON KTll-D 


012242 






&DR40Bp 


MOV 


(R2)+#-(P2) 


1 3RD NAM REFERENCE, ERROR BIT WAS CLEARED 


005077 


163336 




ADR40C! 


CLR 


PSRO 


j TURN OFF KTU-D 


000000 








HLT 




f 3RD REFERENCE TO KERNEL 1 


000422 








BR 


DONE40 


fDIDN'T ABORT 


042777 


000001 


163324 


INT40BI 


BIC 


#1,®SR0 


jTUPN OFF KTll-D 


022777 


020002 


183316 




CMP 


#20002#fSR0 


I CHECK SRO 


001401 








BEQ 


8 *4 




000000 








HLT 




I SRO INCORRECT 


022777 


015136 


163313 




CMP 


#ADR40S,@SR2 


f CHECK SR2 


001401 








BEQ 


**4 




000000 








HLT 




|SR2 INCORRECT - SHOULD CONTAIN 














f LAST FETCH ADDRESS BEFORE ABORT 


022716 


015140 






CMP 


#ADR40C,(SP) 


f CHECK STACK 


001401 








BEQ 


**4 




000000 








HLT 




jPC ON STACK INCORRECT 


022626 






DONS405 


CMP 


(R6)+« (R6)+ 


I RESTORE STACK POINTER 


005077 


163363 




CLR 


9SR0 


fCLEAR ERROR BIT 


003077 


163270 






CLR 


9KTSTA 


I CHANGE TRAP RETURN TO CAUSE A HALT 


016777 


163264 


163260 




MOV 


KTSTA, 9KTVEC 


fON A FALSE INTERRUPT 
















f TEST 113 


TEST THAT ALL 


RESERVED INSTRUCTIONS TRAP 










005237 


000304 




TSTH3I 


INC 


8#$TESTN 


{UPDATE TEST NUMBER 


022737 


000113 


000304 




CMP 


#H3#f#STESTN 


j SEQUENCE ERROR? 


001166 








BNE 


RET4 


I BP TO ERROR HALT ON SEQ ERROR 


042767 


000100 


162310 




BIC 


#100#TPS 




012737 


015302 


000244 




MOV 


#TRAP244,§#244 


I SET UP TO SEE IF 


013767 


000010 


000024 




MOV 


8«10,TEN8AVE 


J THIS PROCESSOR HAS THE 


012737 


015312 


000010 




MOV 


#TRAP10,®#10 


J FLOATING POINT OPTION 


170007 








.WORD 


170007 


f AN ILLEGAL FPP INSTRUCTION 


000406 








BR 


AROUND 


f THE FOLLOWING 








TRAP344f 




f IF FPP !N-« 


013767 


015666 


000362 




MOV 


WPP, FINISH 


1 RESET END OF TABLE POINTER 


000002 








RTI 




1 AND RETURN 








TRAP10I 






f LEAVE THE TABLE ALONE 


000002 








RTI 




I AND RETURN 


000000 






TENSAVEi 


.WORD 





f A PLACE TO STORE CONTENTS OF 10 








AROUND t 






t CONTINUATION POINT 


012737 


000246 


000244 




MOV 


«46#®#244 


» RESTORE THE TRAP VECTOR 


016737 


177764 


000010 




MOV 


TENSAVE,9#10 


f RESTORE THE ILLEGAL INST. VECTOR 


012703 


015646 






MOV 


•TABLE, TAB 


1 TABLE POINTER 


012303 






GSMii 


MOV 


(TAB)*, FIRST 


{FIRST OR CURRENT INSTRUCTION 


012301 








MOV 


(TAB)*, LAST 


f LAST INSTRUCTION OR GROUP 


020567 


000324 






CMP 


FIRST, FINISH 


I TESTED ALL 


001413 








BEQ 


GIN3 


lYES BRANCH 


010567 


000320 






MOV 


FIRST, INST 


ISET UP INST 


003267 


000314 




INC 


INST 




012767 


015552 


162422 




MOV 


#RET,10 


I SET UP RETURN FROM TRAP 
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TEST THAT ALL RESERVED 


2971 


015366 


012706 


000500 






MOV 


#BUFF,SP 


2972 


015372 


005067 


162400 






CLR 


CC 


2973 


0153^6 


000167 


000272 






JMP 


INST 


2974 


015402 


005237 


000306 




GIN3I 


INC 


@#SPASS 


2975 


015406 


105267 


000116 






INCB 


PASSPT 


2976 


015412 


00102? 








BNE 


ACT 


2977 


015414 


132767 


000040 


162677 




BITB 


#40*8ENVM 


2978 


015422 


001023 








BNE 


ACT 


2979 


015424 


023727 


000042 


015502 




CMP 


M42,#8ENDAD 


2990 


015432 


001417 








BEQ 


ACT 


2981 


015434 


012700 


015532 






MOV 


#MSG,RO 


2982 


015440 


105737 


177564 




WAIT! 


TSTB 


f#TPS 


2983 


015444 


10037S 








BPL 


WAIT 


2984 


015446 


112037 


177566 






MOVB 


(ROH»t#TPB 


298S 


015452 


001372 








BNE 


WAIT 


2986 


015454 


105737 


177564 




WAITli 


TSTB 


M TPS 


2987 


015460 


10037S 








BPL 


WAIT1 


2988 


015462 


000005 








RESET 




2989 


015464 


012767 


177761 


000036 




MOV 


#177761 ,PASSPT 


2990 


015472 


013700 


000042 




ACT! 


MOV 


##42# RO 


2991 


015476 


001405 








BEQ 


GOAGIN 


2992 


015500 


000005 






gENDAD! 


RESET 




2993 


015502 


004710 






JSP 


PC, (RO) 


2994 


015|04 


000240 








NOP 




2995 


015506 


000240 








NOP 




2996 


015510 


000240 






GOAGZNi 


NOP 




2997 


015512 


012767 


000012 


1622?0 


MOV 


tl2«10 


2998 


915520 


005067 


162266 






CLR 


12 


2999 


015524 


000167 


163076 






JMP 


RE5TRT 


3000 


015530 


177777 






PASSPTl 


-1 




3001 


015532 


005015 


047105 


020104 


MSGl 


.ASCIZ 


<15><12>.END OF 


3002 


015540 


043117 


042040 


045506 








3003 


015546 


041101 


000040 










3004 
















3005 










1 TRAPPING SHOULD SEND YOU HERE 


3006 


015552 


020627 


000474 




RET I 


CMP 


SP,#BUFF»4 


300? 


015556 


001403 








BEQ 


RST1 


3008 


015560 


012737 


000314 


000302 




MOV 


#314,9#8FATAL 


3009 


015566 


003212 








INC 


(R2> 


3010 


015570 


000000 








HALT 




3011 
















3012 
















3013 


015572 


026727 


162676 


015676 


RETli 


CMP 


BUFF-4,iINST+2 


3014 


015600 


001405 








BEQ 


RET2 


3015 


015602 


012737 


000315 


000302 




MOV 


#3l5,flt$FATAL 


3016 


015610 


005212 








INC 


(R23 


3017 


015612 


000000 








HALT 




3018 
















3019 
















3020 


01561 4 


005767 


162656 




RET2! 


TST 


BUFF*»2 


3021 


015620 


001405 








BEQ 


RET3 


3022 


015622 








PET41 






3023 


015622 


012737 


000316 


000302 




MOV 


#316,§#$FATAL 


3024 


015630 


005212 








INC 


(R2) 


3025 


015632 


000000 








HALT 




3026 

















f SET UP STACK POINTER 

I CLEAR PRIORITY 

I EXECUTE RESERVED INSTRUCTION 

1 SHOULD PRINT THIS PASS? 
I NO 

f WILL APT ALLOW PRINTING? 

f NO 



I GET MSG ADDR, 
fTTY READY 
f NO WAIT 

I PRINT CHARACTER 
1 NEXT IF NOT DONE s 



|D0 IT ABOUT 15 DECIMAL TIMES 
t CHECK ACT 
I KEEP GOING 



tACT HOOKS 



}D0 NEXT PASS 



j TEST DECREMENT OF SP 

% MOVE TO MAILBOX t ««**«*» 31 

I SET MSGTYP TO FATAL ERROR 

! WRONG DECREMENT 

j TO SCOPE REPLACE HALT W/ 240 

> AND REPLACE NEXT INST W/ 625 

fLOC OF INST UN INCREMENTED 

iMOVE TO MAILBOX # ##*#### 31 
I SET MSGTYP TO FATAL ERROR 
jINST INC ON TRAP 
f TO SCOPE REPLACE HALT W/ 240 
I AND REPLACE NEXT INST W/ 614 



jMOVE TO MAILBOX * *##*##* 316 
I SET MSGTYP TO FATAL ERROR 

iCONDITTON CODES SET ON TRAP OR WRONG 8TSTNM 
% TO SCOPE REPLACE HALT W/ 240 



♦*#*#»« 
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MACYll 


27(1006) 
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»n 081 


13 PAGE 








DFKABC, 


Pll 03-MAY-77 


08!42 




Tl 1 3 


TEST THAT ALL RESERVED 


INSTRUCTIONS TRAP 


3027 
















» AND REPLACE NEXT INST W/ 604 


3028 


015634 


026701 


000034 




RET3! 


CMP 


INST, LAST 




3029 


015640 


001636 








BEQ 


GIN1 


t SET UP NEW GROUP 


3030 


015642 


000167 


177506 






JMP 


GIN2 


j FINISH OLD GROUP 


3031 
















1 END OF INSTRUCTION GROUP 


3032 


015646 


000006 






TABLE! 


6 




t END OF OPERATE 


3033 


015650 


000077 








77 






3034 


015652 


000207 








207 




jPTS,RTl, JMP 


3035 


015654 


000227 








227 






3036 


015656 


006777 








6777 






3037 


015660 


007777 








7777 






3038 


015662 


075037 








075037 






3039 


015664 


076777 








76777 






3040 


015666 


167777 






FPPi 


167777 




I START OF THE FPP INSTRUCTIONS 


3041 


015670 


177777 








177777 






3042 


015672 


015672 






FINISH! 






J END FLAG 


3043 


015674 


000000 






INST! 


HALT 




1 WILL CONTINUE RESERVED INST 


3044 


015676 


000000 








HALT 




! SHOULD TRAP TO LOC 10 


3045 


015?00 


000000 








HALT 




fLOC 10 SHOULD SEND YOU TO 


3046 


015702 


000000 








HALT 




1 RET 


3047 


015704 


000000 








HALT 






3048 


015706 


012767 


015716 


162110 


PWRDWNi 


MOV 


#PWRUP,24 




3049 


015714 


000000 








HALT 






3050 


















3051 


015716 


012767 


015706 


162100 


PWRUP! 


MOV 


#PWRDWN,24 




3052 


015724 


012706 


000500 






MOV 


#BUFF,SP 




3053 


015730 


132767 


000040 


162363 




BITB 


#40#*ENVM 


! WILL APT ALLOW PRINTING? 


3054 


015736 


001013 








BNE 


PFRES 


1 NO 


3055 


015740 


012700 


015772 






MOV 


#MSGPWr,RO 


1 GET MSG ADDR „ 


3056 


015744 


105737 


177564 




PWAITi 


TSTB 


®#TPS 


fTTY READY 


303? 


01S750 


100375 








BPL 


PWAIT 


»N0 WAIT 


3058 


015752 


112037 


177566 






MOVB 


(R0)+,8#TPB 


IPRINT CHARACTER 


3059 


015756 


001372 








BNE 


PWAIT 


1 NEXT IF NOT DONE „ 


3060 


015760 


105737 


177564 




PWAIT1! 


TSTB 


©#TPS 




3061 


015?64 


100375 








BPL 


PWAITI 




3062 


015766 


000167 


162634 




PFRES! 


JMP 


RESTRT 




3063 


015772 


005015 


047520 


042527 


MSGPWFi 


.ASCIZ 


«13»<12» a P0WER 


FAILED 1 „ 


3064 


016000 


020122 


040506 


046US 










3065 


016006 


042105 


000041 




CLRALLi 








•3066 


016012 


005077 


162464 




CLR 


@SRO 




3067 


016016 


005000 








CLR 


RO 




306@ 


016020 


012701 


000040 






MOV 


#32»#Rl 


jCOUNT OF REGISTERS TO BE CLEARED 


3069 


016024 


005070 


000516 




CLRLPS 


CLR 


§ ADRTAB(RO) 


> CLEAR REGISTERS THRU ADDRESS TABLE 


3070 


016030 


005720 








TST 


(R0) + 


1 MOVE POINTER 


3071 


016032 


077104 








SOB 


Rl ,CLRLP 


lLOOP TILL DONE 


3072 


016034 


000207 








RTS 


%7 




3073 


















3074 










I SUBROUTINE TO 


MAKE ALL PAGES 


RW, BANK 0, 4K, UP 


3075 


016036 


005077 


162440 




RWALLl 


CLR 


fSRO 




3076 


016042 


012701 


000516 






MOV 


#ADPTAB,R! 


|P1 POINTS TO ADDRESS TABLE 


307? 


016046 


012700 


000010 




RWLlf 


MOV 


#10iPO 


jRO IS COUNTER 


3078 


016052 


005071 


000020 




RWL2I 


CLR 


@>20(R13 


{CLEAR PAR 


3079 


016056 


012731 


077406 






MOV 


#77406, *(Rl)+ 


(SET PDR RW, 4K 


3080 


016062 


077005 








SOB 


R0,RWL2 




3081 


016064 


062701 


000020 






ADD 


#20»R1 




3082 


016070 


020127 


000616 






CMP 


Rl , I ADREND 


I POINTER TO NEXT GROUP 
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TEST THAT ALL RESERVED INSTRUCTIONS TRAP 



3083 016074 002764 BLT RWLi 

3084 016076 000207 RTS %7 

3083 iMAP KERNEL PAR/PDR 7 TO EXTERNAL BANK 

3086 016100 012777 007600 162306 KERN7 I MOV #7600,*KPAR7 

3087 016106 012777 077406 162460 MOV #77406 , »KPDR7 

3088 016114 000207 RTS PC 

3089 000001 <s END 
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ABASE ® 


oooooo 


254 




ACDWi s 


oooooo 


254 




ACDW2 a 


OOOOOO 


254 




ACPUOP* 


OOOOOO 


254 


269 


ACT 


015472 


2976 


2978 


&0ALL 


013026 


2S44 


2547# 


ADDWO a. 


oooooo 


234 




ADDW1 ss 


oooooo 


254 




ADOWlOs 


oooooo 


254 




ADDWH« 


oooooo 


254 




ADDH1 2* 


oooooo 


234 




ADDWISa 


oooooo 


254 




AD0W14S 


oooooo 


234 




ADDW15* 


oooooo 


234 




ADDW2 a 


oooooo 


234 




ADDW3 ■ 


oooooo 


234 




&DDW4 a 


oooooo 


254 




ADDW3 a 


oooooo 


254 




ADDH6 ■ 


oooooo 


234 




ADD6J7 ■ 


oooooo 


234 




AD0W8 a 


oooooo 


254 




ADDW9 ■ 


oooooo 


234 




ADEVCT« 


oooooo 


254 


260 


AOEVM a 


oooooo 


234 




ADREND 


000616 


347# 


3082 


ADRTAB 


000516 


31J8 


3069® 


ADR25 


014476 


2932* 


2842 


ADR25A 


014500 


2833« 


2857 


ADR40 


014756 


28891 


2909 


&DR40& 


013040 


29021* 


2912 


ADR40B 


015136 


2921* 


2929 


ADR40C 


015140 


2922# 


2931 


AENV ■ 


OOOOOO 


234 


265 


AENVM m 


oooooo 


234 


266 


AFATALa 


oooooo 


254 


237 


AMADRla 


oooooo 


254 




AMADR2® 


oooooo 


234 




&MADR3® 


oooooo 


254 




AMADR4a> 


oooooo 


234 




AMAMS1* 


oooooo 


234 




AMAM82* 


oooooo 


254 




AMAM83« 


oooooo 


254 




&MAMS4® 


oooooo 


254 




AMSGADa 


oooooo 


234 


262 


AMSGLGa 


oooooo 


234 


263 


AMSGTY® 


oooooo 


254 


256 


AMTYP1» 


oooooo 


254 




AMTYP2* 


oooooo 


234 




AMTYP3S8 


oooooo 


254 




AMTYP4B 


oooooo 


254 




APAS3 ® 


OOOOOO 


284 


259 


APRIORas 


oooooo 


254 




AROUND 


015316 


2952 


2960# 




oooooo 


254 


267 


ATESTN* 


oooooo 


334 


23S 


ATR&P 


013070 


2349 


2561® 



3076 
2847 
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SEQ 0061 



AUNIT 


m 


oooooo 


254 


261 














AUSHR 


S3 


000000 


254 


268 














AUTO 




013056 


2554$ 
















AUTOl 




013166 


2541 


2587# 














AVECT1* 


oooooo 


254 
















AVECT23S 


oooooo 


254 
















BEGIN 




000620 


236 


239 


352# 












BELL 


B 


000240 


227$ 
















BR1 




000754 


383 


390$ 














BRIO 




001206 


457 


464$ 














BRll 




001322 


485 


492$ 














BR12 




001372 


498 


505# 














8P13 




001442 


511 


318# 














BR14 




001512 


324 


531$ 














IRIS 




001620 


550 


5S7» 














BR16 




001642 


558 


565# 














BR17 




001664 


566 


373* 














BR2 




001004 


393 


400$ 














BR20 




001706 


574 


580$ 














BR21 




001730 


581 


588* 














BR22 




001752 


589 


5963 














BR23 




001774 


597 


604$ 














BR3 




001030 


403 


410$ 














BR33 




002054 


621 


627$ 














BR34 




002070 


628 


634# 














BR35 




002104 


635 


641$ 














BR36 




002120 


642 


648$ 














BR37 




002144 


651 


657# 














BR4 




001056 


414 


421$ 














BP40 




002160 


658 


664$ 














BR41 




002174 


665 


671$ 














BR4S 




003674 


1014 


1019$ 














BR46 




004524 


1112 


1188$ 














BR46A 




004536 


1187 


1194$ 














BR47 




005404 


1363 


1368$ 














BR5 




001104 


425 


432$ 














BR51 




006234 


1463 


1539$ 














BR31A 




006246 


1538 


1545$ 














BR6 




001132 


436 


442$ 














BR60 




012452 


2449# 


2455 














BR7 




001160 


446 


453$ 














BR70 




012662 


2486 


2503$ 














BR71 




013512 


2641 


2648 


2659$ 












BTRAP 




013136 


2564 


2578$ 














BUFF 




000500 


304$ 


684 


700 


703 


716 


719 


732 


737 








868 


871 


884 


887 


900 


905 


912 


916 








1054 


1067 


1070 


1083 


1088 


1095 


1100 


1113 








1236 


1249 


1254 


1261 


1266 


1279 


1318 


1366 








1433 


1438 


1446 


1451 


1464 


1503 


1560 


1575 








1619 


1624 


1637 


1676 


1722 


1737 


1740 


1753 








1800 


1839 


1886 


1901 


1904 


1917 


1920 


1933 








2272 


2290 


2301 


2314 


2320 


2336 


2358 


2388 








2435 


2463 


2474 


2488 


2517 


2523 


2550 


2565 








2755 


2768 


2791 


2815 


2971 


3006 


3013 


3020 


CC 


m 


177776 


234$ 


734# 


746* 


794 


833 


902* 


914* 


961 








1251* 


1263* 


1311 


1351 


1435* 


1448* 


1496 


1535 



744 
929 
1152 
1396 
1578 
1756 
1938 
2415 
2585 
3052 
1000 
1609* 



749 
968 
1202 
1401 
1591 
1770 
1945 
2423 
2598 

1085* 
1621* 



762 

1017 
1217 
1404 
1594 
1775 
1950 
2431 
2644 

1097* 
1669 



801 
1036 
1220 
1417 
1607 
1782 
1963 
2440 
2676 

1 145 
1708 



853 
1051 
1233 
1420 
1612 
1 7R7 
2002 
2447 
2729 

1184 
1772* 
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CLRALL 

CLRLP 

CORH 

CTRAP 

DL11M 

DLUW1 

D0NE40 

DON25 

DTRAP 

FINISH 

FOVER 

FPP 

GIN1 

GIN2 

GINS 

GO AG IN 

HERE * 

HLT ® 

ILLA s 

ILLB s 

INST 

INSTC 

INSTK 

INT25 

INT40 

INT40A 

INT40B 

ITRAP588 

KERN7 

KPARO 

KPAR1 

KPAR2 

KPAR3 

KPAR4 

KPARS 

KPAR6 

KPAR7 

KPDRO 

KPDRt 

KPDR2 

KPDR3 

KPDR4 

KPDR5 

KP0R6 

KPDR7 

KTST& 

KTVEC 

Kl 

K10 

Kit 
K12 
KS 
K3 



016012 
016024 
013024 
013100 
013240 
013244 
015214 
014614 
013114 
015672 
011540 
015666 
015336 
013354 
015402 
015512 
OOOQOO 
OOOOOO 

004700 
000100 
015674 
002350 
007216 
014310 
014774 
015050 
013150 
000004 
016190 
000376 
000600 
000602 
000604 
000606 
000610 
000612 
000614 
000356 
000560 
000562 
000564 
000366 
000370 
000ST2 
000574 
000514 
000312 
000666 

000704 
OOO7O.6 
000710 
000670 
000672 



1784* 
2823 
3069$ 
2546ft 
2564# 
2399 
2601 
2892 
2833 
2567$ 
2954* 
2244 
2954 
2964$ 
2969$ 
2967 
2991 
361$ 
215$ 
2914 
232$ 
233$ 
2968* 
718$ 
1735$ 
2828 
2886 
2897 
2916 

217$ 
2827 
339$ 
340$ 
341$ 
342$ 
343$ 
344# 
345$ 
346$ 
330$ 
331$ 
332$ 
333# 
334$ 
333$ 
336$ 
337$ 
310$ 
309« 
364$ 
336 
371$ 
372$ 
373# 
3631 
366# 



1832 

2882 
3071 
2361* 
2386 
2603# 
2604$ 
2904 
2861$ 
2585 
2966 
2246 
3040$ 
3029 
3030 
2974$ 
2997$ 
381* 
2840 
2923 
2206 
2230 
2969* 

1736 

2836$ 

2893$ 

2905$ 

2923$ 

2868 



3086* 

2826» 

2854 



3087* 

2829* 
2828* 
480* 

363 



1871 

3066$ 



2924 



3042$ 
2258$ 



391* 

2844 
2928 



1935* 1947* 



USER SYMBOLS 
1995 2034 



463 
2849 
2931 



2852 
2935 



2883 


3086$ 










2830 


2884* 










2867* 


2885* 










2861* 


2862 


2870* 


2879 2887* 


2938* 


2939 


2862* 


2869* 


2879* 


2886* 2897* 


2916* 


2939* 


481 


484 


493* 


494 497 


505* 


507 


573 


580 


588 


596 604 
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DFKABC 9 S»11 03«*MAY*>77 


09342 




CROSS 


K4 


- - 
000674 


367# 






K5 


y 000 1 o 


368t 


479* 


482 


K6 


UVw/wO 


369# 


495 


573 


K7 


AAA1 AO 

9007 MA 


370# 


549 


557 


MSG 




2901 


30019 




MS6PWF 


JSf 72 


3055 


30639 




HODL 


013536 


2643 


2667# 




NODLl 


013674 


2675 


26951 




NOOL2 


A 4 A AAA 


2704 


2722S 






014230 


2753 


2782# 




HOP ^ 


0002*0 


228# 






MOB 


01 3042 


23S0# 


2553 




PAS3PT 




352* 


2975® 


2989# 


PF8ES 


013766 


3054 


30629 




PROFTE 


01 32 3D 


2597® 


26029 


2603® 


PWAIT 




3056$ 


3057 


3059 


PWAIT1 




3060# 


3061 




DHPnwN 




354 


30489 


3051 




0137 16 


3048 


30519 




PA 




1365 


1374S 




HB^ 


AA19A& 

00 570© 


1016 


1023s 






005402 


1364® 


1367S 


1374* 


R8i 


003672 


1015* 


10189 


1025* 


RC 


aqj 376 


1366* 


1376 




RCl 


003666 


1017# 


1027 








2730 


2742$ 




RESETS 


014044 


2728 


2736# 




RE8TRT 




353* 


2999 


3062 


RET 




2970 


3006# 






AA441A 
004240 


683 


687S 




RETAH 


002252 


685 


693# 




RETAT 




2273 


2283# 




RETA1 


AAl i A A 


854 


861$ 




RETA2 


003776 


1037 


1044# 




REf A3 


004612 


1203 


1210$ 




RETA4 




1387 


1394# 




RETAS 


aa*1a<» 


1561 


1568$ 




RETB 


00* 302 


701 


7039 








2291 


230l# 




RETBi 


aaa its. 


869 


8719 






00*02© 


1052 


1034§ 




RETB3 


004§42 


1218 


12209 




RETB4 


005536 


1402 


14049 






006352 


1576 


15789 




RETC^ 




717 


7199 




RETCT 


01 1774 


2315 


23209 




RETC1 


AA%9f|A 


885 


8878 






004076 


1068 


10709 




RETC3 


004712 


1234 


1236# 




RETC4 


003506 


1418 


14209 




RETC5 


006422 


1592 


1594# 




RETO 


002432 


733 


7379 




R1TD1 


003260 


901 


905# 




RET02 


004156 


1084 


3 080s 




RETD3 


004772 


1250 


12S4# 




RETD4 


005666 


1434 


1438# 





1375 
1026 



SEQ 0063 



.MAIN. 


MACYU 27(1006) 


04»MAY«» 


77 08 


113 P&6E 


63 




DFKABC.PH 03»MAY«77 


08t42 




CROSS REFERENCE 


TABLE 


RETD5 


006502 


1608 


16129 








RETS 


002500 


745 


749# 








RETEi 


003324 


913 


916# 








RETE2 


004224 


1096 


1100# 








RSTE3 


005040 


1262 


12669 








RETE4 


005734 


1447 


1451# 








RETE3 


006550 


1620 


16248 








REf F 


002556 


763 


766# 








RETF1 


003402 


930 


933# 








RETF2 


004302 


1114 


11179 








RETF3 


005116 


1380 


1283# 








RETF4 


006012 


1465 


1468# 








RETF5 


006626 


1638 


16419 








RETG 


002702 


802 


805# 








REfGl 


003526 


969 


972» 








RETG2 


004426 


1153 


H5S# 








RE?G3 


005242 


1319 


1322# 








RETG4 


006136 


1504 


1507# 








RETG5 


006752 


1677 


16809 








RETHS 


007120 


1723 


17308 








RETJ 


007150 


1738 


17409 








RETK 


007220 


1754 


1756S 








RETL 


007300 


1771 


1773S 








RETM 


007346 


1783 


1787S 








RETM 


007424 


1801 


1804# 








RETO 


007546 


1840 


18438 








RETP 


007716 


1887 


18949 








RET© 


007750 


1902 


1904# 








RETR 


010022 


1918 


1920S 








RETS 


010104 


1934 


1938# 








RETT 


010154 


1946 


19S0# 








RETU 


010234 


1964 


1967S 








RETV 


010362 


2003 


2006# 








RET1 


015572 


3007 


3013$ 








RET2 


015614 


3014 


30203 








RETS 


015634 


3021 


3028# 








RET33 


014670 


2869 


2874« 








RET4 


015622 


2946 


3022s 








RTJ1 


012250 


2390 


2394# 








RT12 


012264 


2391 


24001 








STRAP 88 


000010 


23i« 


685* 


701* 


717® 


733# 


RTRAP1" 


000034 


222$ 


854# 


869* 


885® 


901* 


RTRAP2" 


000020 


221S 


1037* 


1052* 


1068® 


1084* 


RTRAP3® 


000030 


2209 


1203* 


1218® 


1234* 


1230® 


RTRAP4® 


000014 


219# 


1387* 


1402* 


1418# 


1434* 


RTR&P5® 


000004 


218# 




1576* 


1392* 


1608* 






1771* 


1783# 


1801® 


1802® 


1840* 






2003« 


2004® 








RTT1 


012060 


2339 


23429 








RTT2 


012076 


2340 


2350# 








RTT3 


012144 


2360 


2364ff 








RTT4 


012164 


2361 


23729 








RTT3 


012116 


2358# 


2363 


2375 






RTT6 


012206 


2373 


238i# 








RWALL 


016036 


2866 


307S# 








RWL1 


013046 


30?7# 


3083 









USER SYMBOLS SEQ 0064 



745® 


763* 


764® 


802* 


803* 








913® 


930* 


931* 


969® 


970* 








1096* 


1114* 


1115® 


1133* 


1154* 








1262® 


1280* 


1281* 


1319* 


1320* 








1447* 




1466* 


1504* 


1505* 


2273® 


2291* 


2315® 


1620* 


1638* 


1639* 


1677® 


1678* 


1723* 


1738* 


1754® 


1841* 


1887* 


1902* 


1918® 


1934* 


1946® 


1964* 


1963® 
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DFKA8C 8 P11 03»MAY»77 GSi42 CROSS REFERENCE TABLE »» USER SYMBOLS 



SEQ 0065 



RWL2 
R7TRX 
R7TR1 
R7fR2 



0160S2 
013400 
012346 
012416 



R7IR2A 013404 
R7TR3 012466 



R7TR4 

SRO 



012340 
000301 



8R0H 000304 
SRI 000506 
SR2 000110 
STATUS* 177776 



STP 

STPP 

STPPA 

STP3 

STP3D 

STP4 

STP4E 

TABLE 

TDEC1 

TDEC2 

TDEC3 

TDEC4 

TDEC6 

TDEC7 

TDEC77 

TDECB 

TENSAV 

T0NT1 

TPB » 

TPS « 

TRACE 

TRAPA a 

TRAPB 

TRAP10 

TRAP24 

TRCSR * 

TRC1 

TRT «s 

TRO 

TR2 

TR3 

TR4 

TR4A 

TR5 

TSL 

TST1 

TST10 

TST100 

TST101 

TST102 

T5T103 

TST104 



011552 

003000 
003012 
6l2?64 
012776 
014416 
014430 
015646 
010330 
010560 
010634 
010706 
010722 
010734 
013162 
013350 
0153H 
012674 
177566 
177564 
012650 
000007 
013200 
015312 
OJ5302 
177560 
012754 
000003 
013500 
013524 
013632 
013646 
012526 
013634 
013^22 
000712 
002374 
012302 
012570 
012710 
013004 
013252 



30781 

2613 

2416 

2432 
2434$ 
2448 
2464 

305# 
2902* 
3061 
307* 
308* 
229* 
2773 
2237 
761 
836 
2316 
2324 
2789 
2816 
2963 
2049 
2065 
2083 
2094 
21049 
2102 
2617 
26 1 1 
2949* 
2492 
226# 
223* 
2489 

230# 
2369 
2950 
2948 

224» 
2518 

216* 
2646 
2649 
2679 
2680 
2467* 
2673 
2S45# 
363 
715 
2387 
2414 
2314# 
2539# 
2609* 



3080 

2635# 

2423* 

24401 

2440 

2455* 

2473* 

2831* 

2905® 



2842 

620* 
2801* 
2364$ 
837# 
843# 
2525# 
253i# 
28l7# 
2823* 
3032* 
2036* 
2067* 
2083* 
2101S 

2110# 

2618 

2938* 

2509# 

2796# 

2600 

2497# 

686 
2393$ 
2956# 
2953# 
2706* 
2S21 
1388 
2653* 
266S* 
2684* 
2691* 
2474 
2681 

377* 
720 
2402 
2475 



2834® 
2906 



2836 
2917* 



2837* 

2920* 



2871* 
2922* 



2874 

2925* 



2878* 

2926 



2888* 
2937* 



2890* 
3066* 



2893* 
3075* 



2846* 2847 
649* 2578 
2808 



2909 2929 

2615* 2620* 2645* 2651* 2677* 2742* 2757* 2760 2771* 



2626# 
2962 












2799* 
2790* 


2984* 
2794 


3058® 
2797 


2800* 


2947* 


2982 


702 


718 


736 


748 


765 


804 


2715 

2323* 

1403 


1419 


1437 


1450 


1467 


1506 



729* 

2412# 
2484* 



.MAIN. 


MACY11 27(1006) 


04*>MAY« 


77 08 


f 13 PAGE 


DFKABC.P11 03-MAY-77 


08142 




CROSS R 


TST10S 


013*00 


2639# 






TST106 


013336 


2671* 






TST107 


013674 


2700* 






TST11 


002322 


731 


730 


7598 


TST110 


014000 


2702 


2716 


2726* 


TST111 


014074 


2749* 






TST1 12 


014250 


2787* 






TST113 


015232 


2944* 






TST12 


003024 


848* 






TST13 


003100 


350 


863$ 




TST14 


003150 


867 


872 


881* 


TST15 


003222 


883 


888 


897* 


TST16 


003346 


899 


917 


926* 


TST17 


003636 


928 


1003 


1012* 


TST2 


001|36 


379 


467 


476* 


TST20 


003734 


1033* 






TST21 


003776 


1033 


1048* 




TST22 


004046 


1030 


1055 


1064# 


TST23 


004120 


1066 


1071 


1080* 


TST24 


004246 


1082 


1101 


1110* 


TST2S 


004330 


1199* 






TST26 


004612 


1201 


12l4# 




TST27 


004662 


1216 


1221 


1230* 


T5T3 


001362 


478 


537 


546* 


TST30 


004734 


1232 


1237 


1246$ 


TST31 


005062 


1248 


1267 


1276* 


TST32 


005346 


1278 


1352 


13611 


TST33 


005444 


1383* 






TST34 


005506 


1385 


1398* 




TST35 


005336 


1400 


1405 


1414# 


T3T36 


005630 


1416 


1421 


1430* 


TST37 


00S7S6 


1432 


1432 


1461* 


TST4 


002016 


348 


605 


616* 


TST40 


006260 


1S57# 






TST41 


906322 


1339 


1572* 




TST42 


006372 


1374 


1579 


1388# 


TST43 


006444 


1590 


1S9S 


1604* 


TST44 


006572 


1606 


1625 


16341 


T3T45 


007056 


1636 


1710 


1719* 


TST46 


007120 


1721 


1734# 




TST47 


007170 


1736 


1741 


i730# 


TSTS 


002210 


618 


672 


681* 


TST50 


007242 


1752 


1757 


1767* 


TSTS1 


007370 


1769 


1788 


1797* 


TST52 


007§52 


1799 


1873 


1883* 


TSTS 3 


007716 


1885 


1898# 




TST54 


007770 


1900 


1905 


1914# 


TSTS5 


010044 


1916 


1921 


1930* 


TST56 


010176 


1932 


1951 


I960* 


TST57 


010466 


1962 


2036 


2043* 


TST6 


002232 


697# 






TST66 


010*530 


2047 


206l# 




TST61 


010600 


2063 


2068 


2078* 


TST62 


010734 


2080 


21iS# 




TST63 


011012 


2132* 






TST64 


011070 


2149* 







USER SYMBOLS 



SEQ 0066 
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USER SYMBOLS 



TST65 


011)46 


2166# 






TST66 


011224 


2 1 8 3 # 






TST67 


011302 


2200* 






TST7 


002322 


699 


704 


713# 


TST70 


011400 


2213 


2224* 




TST71 


011456 


2242# 






T3T73 


011564 


2269# 






TST7 3 


0U640 


2271 


2287# 




TST74 


011734 


2289 


2302 


2311* 


TST75 


012016 


2313 


2321 


2332 # 


TST76 


012076 


2334 


2343 


2354# 


TST77 


012206 


2356 


23S5# 




TTCSR » 


177564 


2238 


26l9# 


2632* 


TTT37 


014244 


2774 


278l# 




TTY11 


014232 


2731 


2775* 




TTY3 


014150 


2756 


2760# 




TTY4 


014224 


2769 


2773* 




UPARO 


000536 


321S 






UPAR1 


000540 


322# 






UPAR2 


OOO542 


323# 






UPAR3 


000544 


324$ 






UPAR4 


000546 


325# 






UPAR5 


000550 


326* 






UPAR6 


000552 


327* 






UPAR7 


000554 


328* 






UPDRO 


000516 


312* 






UPDR1 


000520 


313# 






UPDR2 


000522 


314* 






UPDR3 


000524 


315* 






UPDR4 


000526 


316* 






UPDRS 


000530 


317# 






UPDR6 


000532 


318* 






UPDR7 


000534 


319* 






VDEC1 


011004 


2120 


2128* 




VDECtO 


011262 


2185 


2187 


2190* 


VDECll 


011340 


2202 


2204 


2207* 


VDEC12 


011352 


2205 


22l3# 




VDEC1 3 


011436 


2226 


2228 


2231* 


V0EC14 


011450 


2229 


2237# 




VDEC2 


010772 


2117 


2119 


21228 


VDEC3 


01 1062 


2137 


2145* 




VDEC4 


011050 


2134 


2136 


2139* 


VDEC5 


01H40 


2154 


2162* 




VDEC6 


011126 


2151 


2133 


2156* 


VDEC7 


011216 


2171 


2179# 




VDECf 


01 1204 


2168 


2170 


2173* 


VDEC9 


011274 


2188 


2196* 




WAIT 


015440 


2982# 


2983 


2985 


HAITI 


015454 


2986$ 






WATE 


014366 


2792 


28089 




WATE1 


014310 


2794* 


2795 




WATE2 


014324 


2797* 


2798 




WATE1 


014352 


2802* 


2815 




8APTHD 


000330 


287 


293S 




SCPUOP 


000326 


269# 






$DEVCT 


000310 


260* 







2647® 2666* 267B# 2705* 



2759* 2772* 2781* 
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SENDAD 015502 

$ENV 000320 

SENVM 000321 

$ERN * 000317 



USER SYMBOLS 



SEQ 0068 



«ERPOR« 000302 

$ETABL 000320 

$ETEND 000330 

SFATAL 000302 



8HIBTS 000330 
SMAIL 000300 



247 


2979 


2993$ 






















26S# 


























2664 


2977 


3053 






















It 


384 


385# 


394 


395* 


404 


405* 


415 


416* 


426 


427* 


437 


438* 


447 


448# 


458 


459# 


468 


469* 


486 


487* 


499 


500« 


512 


513* 


525 


5268 


538 


539# 


551 


552* 


359 


560* 


567 


568* 


575 


576* 


582 


583* 


590 


591* 


598 


S99* 


606 


607* 


622 


623* 


629 


630* 


636 


6378 


643 


644* 


652 


653* 


659 


660* 


666 


667* 


673 


674* 


688 


689* 


705 


706* 


721 


722S 


739 


740S 


751 


752* 


768 


769* 


775 


776* 


782 


783* 


789 


790# 


796 


797S 


807 


808* 


814 


815* 


821 


822* 


828 


829* 


838 


839* 


856 


857# 


873 


874* 


889 


890* 


907 


908* 


918 


919* 


935 


936* 


942 


943* 


949 


950* 


956 


957* 


963 


964# 


974 


975* 


981 


982* 


988 


989* 


995 


996* 


1004 


1005* 


1020 


1021# 


1039 


1040* 


1056 


1057* 


1072 


1073* 


1090 


109l# 


1102 


1103* 


1119 


1120* 


1126 


1127S 


1133 


1134* 


1 140 


1141* 


1147 


1148* 


1158 


1139* 


1163 


1166* 


1172 


1173* 


1179 


1180* 


1189 


1190* 


1205 


1206* 


1222 


1223* 


1238 


1239# 


1256 


1257* 


1268 


1269* 


1285 


1286* 


1292 


1293* 


1299 


1300* 


1306 


1307* 


1313 


1314* 


1324 


1325* 


1331 


1332* 


1338 


1339* 


1345 


1346* 


1353 


13S4# 


1369 


1370* 


1389 


1390* 


1406 


1407* 


1422 


1423* 


1441 


1442* 


1453 


1454* 


1470 


1471* 


1477 


14788 


1484 


1485* 


1491 


1492* 


1498 


1499* 


1509 


1510* 


1516 


15175* 


1523 


1324S 


1530 


1531# 


1540 


1341* 


1563 


1564* 


1580 


1581* 


1596 


1597« 


1614 


1615* 


1626 


1627* 


1643 


1644* 


1630 


1651* 


1657 


1658* 


1664 


1665* 


1671 


1672* 


1682 


1683S 


1689 


1690* 


1696 


1697* 


1703 


1704* 


1711 


1712* 


1725 


1726* 


1742 


1743* 


1758 


1759* 


1777 


1778* 


1789 


1790* 


1806 


1807* 


1813 


1814* 


1820 


1821 # 


1827 


1920S 


1834 


1835* 


1845 


1846* 


1852 


1853* 


1859 


1860# 


1866 


1867* 


1874 


1875* 


1889 


1890* 


1906 


1907* 


1922 


1923* 


1940 


1941* 


1952 


1953« 


1969 


1970* 


1976 


1977* 


1983 


1984* 


1990 


1991* 


1997 


1998* 


2008 


2009# 


2015 


2016* 


2022 


2023# 


2029 


2030* 


2037 


2038* 


2051 


2052* 


2069 


2070* 


2087 


2088* 


2096 


2097S 


2105 


2106# 


2123 


2124# 


2140 


2141* 


2157 


2158* 


2174 


2175* 


2191 


2192* 


2208 


2209* 


2216 


2217* 


2232 


2233* 


2259 


2260* 


2278 


2279* 


2296 


2297* 


2303 


2304* 


2322 


2323* 


2344 


2345# 


2367 


2368* 


2376 


2377* 


2395 


2396* 


2403 


2404* 


2418 


2419* 


2423 


2426* 


2435 


2436* 


2442 


2443* 


2450 


2451* 


2457 


2458* 


2468 


2469# 


2476 


24771 


2498 


2499* 


2504 


2505* 


2526 


2527* 


2555 


2556* 


2570 


2571* 


2580 


2581# 


2388 


2589* 


2621 


2622* 


2627 


2628* 


2654 


2655* 


2660 


2661* 


2686 


2687* 


2710 


2711* 


2717 


2718* 


2737 


2738* 


2762 


2763* 


2776 


2777* 


2803 


2804* 


2810 


2811* 


2818 


2819* 


3008 


3009* 


3015 


3016* 


3023 


3024* 








301* 


337* 
























264* 


























276# 


299 
























257* 


301 


384* 


394* 


404* 


413* 


426* 


437* 


447* 


458* 


468* 


486* 


499* 


312* 


323* 


338* 


351* 


559* 


567* 


575* 


582* 


590* 


598* 


606* 


622* 


629* 


636* 


643* 


652* 


659* 


666* 


673* 


688* 


705* 


721* 


739* 


751* 


768* 


775* 


782* 


789* 


796* 


807* 


814* 


821* 


828® 


838* 


856* 


873* 


889* 


907* 


918* 


935* 


942* 


949* 


956* 


963* 


974* 


981* 


988* 


995* 


1004* 


1020* 


1039* 


1056* 


1072® 


1090* 


1102* 


1119* 


1126* 


1133* 


1140* 


1147* 


1158* 


1165* 


1172* 


1179* 


1189* 


1205* 


1222* 


1238* 


1256* 


1268* 


1285* 


1292* 


1299* 


1306* 


1313* 


1324* 


1331* 


1338* 


1345* 


1353* 


1369* 


1389* 


1406* 


1422* 


1441* 


1453* 


1470* 


1477* 


1484* 


1491* 


1498* 


1509* 


1516* 


1523* 


1530* 


1540* 


1563* 


1580* 


1596* 


1614* 


1626* 


1643* 


1650* 


1657* 


1664* 


1671* 


1682* 


1689* 


1696* 


1703* 


1711* 


1725* 


1742* 


1758* 


1777* 


1789* 


1806* 


1813* 


1820* 


1827* 


1834* 


1845* 


1852* 


1859* 


1866* 


1874* 


1889* 


1906* 


1922* 


1940* 


1952* 


1969* 


1976* 


1983* 


1990* 


1997* 


2008* 


2015* 


2022* 


2029* 


2037* 


2051* 


2069* 


2087* 


2096* 


2105* 


2123* 


2140* 


2157* 


2174* 


2191* 


2208* 


2216* 


2232* 


2259* 


2278* 


2296$ 


2303* 


2322* 


2344* 


2367* 


2376* 


2395* 


2403* 


2418* 


2425* 


2435* 


2442* 


2450* 


2457* 


2468* 


2476* 


2498* 


2504* 


2526* 


2355* 


2570* 


2580* 


2588* 


2621* 


2627* 


2654* 


2660* 


2686* 


2710* 


2717* 


2737* 


2762* 


2776* 


2803* 


2810* 


2818* 


3008* 


3015* 


3023* 


294# 
25S# 


295 


299 























.MAIN, MACY11 27f 1006) 04-MAY-77 08U3 PAGE 70 

DFKABC.P11 03-MAY-77 08142 CROSS REFERENCE TABLE • • USER SYMBOLS 



SEO 0069 



$MBADR 
$MSGAD 
IMSGLG 
IMSGTY 

$PASS 
SPASTM 
ISVPC a 

$sm » 

$SWPEG 
ITESTN 



000332 
000314 
000316 
000300 
000306 
000336 
000300 
000000 
000322 
000304 



$TN * 000114 



$TSTM 000334 

gTSTNMs 000304 

$UNIT 000312 

$UNITM 000340 

$USWP 000324 

$X a 015246 



295# 
262* 
263* 
258* 
238* 
297# 
245# 
1# 
267* 



296* 
300* 
261# 
298* 
268# 



333* 
239S 



250 



358 
2974* 



258# 


300 


377* 


378 


476* 


477 


546* 


547 


616* 


617 


68l* 


682 


697* 


698 


7l3# 


714 


729® 


730 


759* 


760 


848* 


849 


865* 


866 


881* 


882 


897* 


898 


926* 


927 


1012* 


1013 


1033* 


1034 


1048* 


1049 


1064* 


1065 


1080* 


1081 


1110* 


1111 


1199* 


1200 


1214* 


1215 


1230* 


1231 


1246* 


1247 


1276* 


1277 


1361* 


1 362 


1383* 


1 384 


1398* 


1399 


1414* 


1415 


1430* 


1431 


1461* 


1462 


1557* 


1558 


1572* 


1573 


1588# 


1589 


1604* 


1605 


1634* 


1635 


1719* 


1720 


1734* 


1735 


1750* 


1751 


1767* 


1768 


1797* 


1798 


1883* 


1884 


1898* 


1899 


1914* 


1915 


1930* 


1931 


i960* 


1961 


2045* 


2046 


2061* 


2062 


2078* 


2079 


2115* 


2116 


2132* 


2133 


2149® 


2150 


2166* 


2167 


2183* 


2184 


2200* 


2201 


2224* 


2225 


2242* 


2243 


2269* 


2270 


2287* 


2288 


2311* 


2312 


2332* 


2333 


2354* 


2355 


2385* 


2386 


2412* 


2413 


2484* 


2483 




2515 


2539* 


2540 


2609* 


2610 


2639* 


2640 


267 1* 


2672 


2700* 


2701 


2726* 


2727 


2749» 


2750 


2787* 


2788 


2944* 


2945 










1# 


374 


380# 


467 


473 


479* 


537 


543 


549# 


605 


613 


619* 


672 


678 


684* 


694 


700# 


704 


710 


716* 


720 


726 


732* 


750 


756 


762* 


845 


8S1« 


862 


3689 


872 


878 


884* 


888 


894 


900* 


917 


923 


929* 


1003 


1009 


1015* 


1030 


1036$ 


1045 


1051# 


1055 


1061 


1067# 


1071 


1077 


1083# 


1101 


1107 


11133 


1196 


1202# 


1211 


1217# 


1221 


1227 


1233# 


1237 


1243 


1249# 


1267 


1273 


1279* 


1352 


1358 


1364* 


1380 


1386# 


1395 


1401* 


1405 


1411 


14178 


1421 


1427 


1433S 


1452 


1458 


1464# 


1554 


15608 


1569 


1575* 


1579 


1585 


1591* 


1595 


160i 


1607* 


1625 


1631 


16378 


1710 


1716 


1722* 


1731 


1737# 


1741 


1747 


1753# 


1757 


1764 


1770# 


1788 


1794 


1800* 


1873 


1880 


1886* 


1895 


1901# 


1905 


1911 


1917# 


1921 


1927 


1933S 


1951 


1957 


1963* 


2036 


2042 


20483 


2058 


2064# 


2068 


2075 


2081* 


2112 


2118# 


2129 


2135« 


2146 


2152« 


2163 


2169# 


2180 


2186* 


2197 


2203S 


2213 


2221 


2227# 


2239 


2245# 


2266 


2272# 


2284 


2290* 


2302 


2308 


2314$ 


2321 


2329 


2335* 


2343 


2351 


2357* 


2382 


2388* 


2402 


2409 


24158 


2475 


2481 


248?* 


2511 


2517* 


2536 


2542# 


2606 


2812* 


2636 


2642* 


2668 


2674S 


2697 


2703# 


2716 


2723 


2729* 


2746 


2752* 


2784 


2790* 


2941 


2947* 









356* 



380* 


387 


397 


407 


418 


429 


440 


450 


461 


471 


479* 


489 


502 


515 


528 


541 


5498 


554 


562 


570 


578 


585 


593 


601 


609 


619» 


623 


633 


639 


646 


655 


662 


669 


676 


684$ 


691 


700* 


708 


716* 


724 


732# 


742 


754 


762* 


771 


778 


785 


792 


799 


810 


817 


824 


831 


841 


851# 


859 


868# 


876 


8849 


892 


900* 


910 


921 


929* 


938 


945 


952 


959 


966 


977 


984 


991 


998 


1007 


1015* 


1023 


1036* 


1042 


1051* 


1059 


10678 


1075 


1083« 


1093 


1105 


1113* 


1122 


1129 


1136 


1143 


1150 


5161 


1168 


1175 


1182 


1192 


1202* 


1208 


1217# 


1225 


1233* 


1241 


1249* 


1259 


1271 


1279* 


1288 


1295 


1302 


1309 


1316 


1327 


1334 


1341 


1348 


1356 


13648 


1372 


1386* 


1392 


1401 # 


1409 


1417* 


1425 


1433* 


1444 


1456 


1464* 


1473 


1480 


1487 


1494 


1501 


1512 


1519 


1526 


1533 


1543 


1560* 


1566 


15751 


1583 


1591 » 


1599 


16071 


1617 


1629 


1637* 


1646 


1633 


1660 


1667 


1674 


1685 


1692 


1699 


1706 


1714 


1722# 


1728 


1737# 


1745 


1753* 


1761 


1770* 


1780 


1792 


1800* 


1809 


1816 


1823 


1830 


1837 


1848 


1835 


1862 


1869 


1877 


1886# 


1892 


1901 # 


1909 


1917* 


1925 


1933* 


1943 


1955 


1963* 


1972 


1979 


1986 


1993 


2000 


2011 


2018 
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8XX ss 177605 



08142 




CROSS 


REFERENCE 


TABLE .« 


USER SYMBOLS 












SEQ 


2025 


2032 


2040 


2048# 


2054 


2064# 


2072 


2081* 


2090 


2099 


2108 


2118* 


2126 


2133* 


2143 


2152* 


2160 


2169# 


2177 


2186* 


2194 


2203* 


2211 


2219 


2227* 


2235 


22458 


2262 


2272* 


2281 


2290* 


2299 


2306 


2314* 


2325 


2335* 


2347 


2357* 


2370 


2379 


23381? 


2398 


2406 


2415* 


2421 


2428 


2438 


2445 


2453 


2460 


2471 


2479 


2487* 


2301 


2307 


2517$ 


2529 


2542* 


2558 


2573 


2583 


2591 


2612* 


2624 


2630 


2642* 


2657 


2663 


2674* 


2689 


2703* 


2713 


2720 


2729* 


2740 


2752* 


2765 


2779 


2790# 


2806 


2813 


2821 


2947* 


3011 


3018 


3026 












387# 


397# 


407* 


418* 


429* 


440$ 


450* 


4619 


471* 


489# 


502* 


513* 


528* 


54lt 


S34# 


562* 


570* 


578* 


S85# 


593* 


601* 


609S 


625* 


632* 


639* 


646* 


655* 


682# 


669# 


676* 


69H 


?08# 


724* 


742* 


754* 


771* 


778* 


785* 


792* 


799# 


810# 


817* 


824* 


831# 


841* 


859* 


876* 


892* 


910* 


921* 


938* 


945* 


952* 


939# 


966* 


977* 


984« 


991* 


998* 


10078 


1023* 


1042* 


1059* 


1075* 


1093* 


1105* 


U22# 


1129* 


1136* 


1143# 


1150* 


1161* 


1168* 


1175* 


1182* 


1192* 


1208* 


1225* 


1241 1 


1259* 


1271* 


1288* 


1295# 


1302* 


1309* 


1316* 


1327* 


1334* 


1341* 


1348* 


1356* 


1372* 


1392* 


1409* 


1425* 


1444* 


1456* 


1473* 


1480* 


1487* 


1494* 


1501* 


1512* 


1519* 


1526# 


1333* 


1543* 


1566* 


1583* 


1399* 


1617* 


1629* 


1646* 


1653* 


1660* 


1667* 


1674* 


1685* 


1692* 


1699* 


1706* 


1714* 


1728* 


1745* 


1761* 


1780* 


1792* 


1809* 


1816* 


1823* 


1830* 


1837* 


1848* 


1853* 


1862* 


1869* 


1877* 


1892* 


1909* 


1925* 


1943* 


1955* 


1972* 


19791 


1986* 


1993* 


2000* 


2011* 


2018* 


2025* 


2032* 


2040* 


2054* 


2072* 


2090* 


2099* 


2108* 


21261 


2143* 


2160* 


2177* 


2194* 


2211* 


2219* 


2235* 


2262* 


2281$ 


2299* 


2306* 


2325* 


2347* 


2370* 


2379* 


2398* 


2406* 


2421* 


2428* 


2438* 


2445* 


2453* 


2460* 


2471* 


2479# 


2301* 


2S07# 


2529* 


2558* 


2373* 


2583* 


2591* 


2624* 


2630* 


2657* 


2663* 


2689* 


2713* 


2720* 


2740* 


2765* 


2779* 


2806* 


2813* 


2821* 


3011* 


3018* 


3026* 






387# 


397* 


407* 


418* 


429* 


440$ 


450* 


461* 


471* 


489* 


502* 


515* 


528* 


S4l# 


534* 


362# 


370* 


578# 


385* 


593* 


601* 


609* 


625* 


632* 


639* 


646* 


635$ 


662» 


669# 


676* 


691# 


708* 


724* 


742* 


754* 


771* 


778* 


785# 


792* 


799# 


810# 


817* 


824* 


831* 


841* 


839* 


876* 


892* 


910* 


921* 


938* 


945* 


932* 


959# 


963# 


977* 


984* 


991* 


998* 


1007* 


1023* 


1042* 


1059* 


1075* 


1093* 


1105* 


H22# 


1129* 


1136* 


1143* 


1150* 


1161* 


1168* 


1175* 


1182* 


1192* 


1208* 


1225* 


1241* 


1239* 


127l# 


1288# 


12958 


1302* 


1309* 


1316* 


1327* 


1334* 


1341* 


1348* 


1336* 


1372* 


1392* 


1409* 


1425* 


1444* 


1456* 


1473* 


1480* 


1487* 


1494* 


1501# 


1512* 


1519* 


1526* 


1S33# 


1543* 


1566* 


1583* 


1399* 


1617* 


1629* 


1646* 


1653* 


1660* 


1667* 


1674* 


1683# 


1692* 


1699S 


1706* 


1714* 


1728* 


174S* 


1761* 


1780* 


1792* 


1809* 


1816* 


1823* 


1830* 


1837* 


1848* 


1855* 


18623 


1869* 


1877* 


1892* 


1909* 


1925* 


1943# 


1955* 


1972* 


1979* 


1986* 


1993* 


2000* 


2011* 


2018* 


2025* 


2032* 


2040* 


2054* 


2072* 


2090* 


2099* 


2108* 


2126* 


2143* 


2160* 


2177* 


2l94t 


2211* 


2219* 


2235* 


2262* 


2281* 


2299* 


2306* 


2323# 


2347» 


23701 


2379* 


2398S 


2406* 


2421* 


2428* 


2438* 


2445* 


2453* 


2460* 


2471* 


2479* 


2301* 


2507* 


2329* 


2558* 


2S73# 


2583* 


25918 


2624* 


2630* 


2657* 


2663* 


2689* 


2713* 


2720* 


2740* 


2763* 


2779* 


2806* 


2813* 


2821* 


3011* 


3018* 


3026* 






23S* 


237# 


240# 


245 


246* 


248* 


250* 


283 


284* 


2868 


288* 


303* 


347 


380 


387 


397 


407 


418 


429 


440 


450 


461 


471 


479 


489 


502 


515 


S28 


341 


349 


354 


362 


570 


578 


585 


593 


601 


609 


619 


625 


632 


639 


646 


655 


662 


669 


676 


684 


691 


700 


708 


716 


719 


724 


732 


742 


754 


762 


771 


778 


785 


792 


799 


810 


817 


824 


831 


841 


831 


859 


868 


876 


884 


8*7 


892 


900 


910 


921 


929 


938 


945 


952 


939 


966 


977 


984 


991 


998 


1007 


1015 


1023 


1036 


1042 


1051 


1059 


1067 


1070 


1075 


1083 


1093 


1105 


1113 


1122 


1129 


1136 


1143 


1130 


1161 


1168 


1175 


1182 


1192 


1202 


1208 


1217 


1223 


1233 


1236 


1241 


1249 


1259 


1271 


1279 


1288 


1295 


1302 


1309 


1316 


1327 


1334 


1341 


1348 


1356 


1364 


1372 


1386 


1392 


1401 


1409 


1417 


1420 


1425 


1433 


1444 


1436 


1434 


1473 


1480 


1487 


1494 


1501 


1512 


1519 


1526 


1533 


1543 


1560 


1366 


157S 


1583 


1591 


1594 


1599 


1607 


1617 


1629 


1637 


1646 


1653 


1660 


1667 


1674 


1685 


1692 


1699 


1706 


1714 


1722 


1728 


1737 


1745 


1753 


1761 


1770 


1780 


1792 


1800 


1809 


1816 


1823 


1830 


1837 


1848 


1855 


1862 


1169 


1177 


1886 


1892 


1901 


1909 


1917 


1920 


1925 


1933 


1943 


1955 


1963 


1972 


1979 


1986 


1993 


2000 


2011 


2018 


2025 


2032 


2040 


2048 


2034 


2064 



DFKABC. PI 1 



000330 



03«MAY»77 08142 




CROSS 


REFERENCE 


TABLE 


•« USER 


SYMBOLS 












SEQ 


20?2 


2081 


2090 


2099 


2108 


2118 


2126 


2135 


2143 


2152 


2160 


t*6S 


2177 


2196 


2194 


2203 


2211 


2219 


2227 


2235 


2245 


2262 


2272 


2275 


2281 


2290 


2293 


2299 


2306 


2314 


2317 


2320 


2325 


2335 


2347 


2357 


2370 


2379 


2388 


2398 


2406 


2415 


2421 


2428 


2438 


2445 


2453 


2460 


2471 


2479 


2487 


2494 


2501 


23Q7 


2517 


2529 


2542 


2558 


2573 


2583 


2591 


2612 


2624 


2630 


2642 


2657 


2663 


2674 


2689 


2703 


2713 


2720 


2729 


2740 


2752 


2765 


2779 


2790 


2306 


2#ll 


2821 


2839 


2843 


2848 


2851 


2855 


2858 


2875 


2895 


2907 


2910 


2913 


292? 


2930 


2934 


2947 


3011 


3018 


3026 


3042 
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„ ABS a 016116 
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